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INTRODUCTION 


The ELIZA program provides a method for carrying on 
teletyped conversations in a natural language between 
students and a computer. ELIZA is named for Eliza 
Doolittle, the central character of Pygmalion and My Fair 
Lady, who, we are sure, can be taught to speak better than 
she does now. The program was developed by Professor Joseph 
Weizenbaum of the MILT. Department of Electrical 
Engineering.(1,2) The M.I.T. Education Research Center, 
together with collaborators around the country, is beginning 
to apply the program to tutoring students and assisting them 
in calculations and problem-solving. Some of the present 
capabilities of the system are described in a paper by Dr. 
Edwin Taylor of the M.1.T. Department of Physics and the 
Education Research Center.(3) The use of small discussion 
units with the program, which is described in the manual, 
was developed in my bachelor's thesis for the M.1.T. 
Department of Physics.(4) The computer presently being used 
with the ELIZA program is the large, general purpose, IBM 
7094 in time-sharing mode at the M.I.T. Project MAC and at 
the M.1.T. Computation Center. 


This manual is intended for both Inexperienced users 
learning how to write scripts and experienced users checking 
on some details of the system. Thus, some sections may seem 
especially incomprehensible to the beginner. | suggest that 
the beginner read Chapters 1 and 2, and then try to write 
and play some scripts. The rest of the chapters contain 
information not directly related to this first step of 
writing a script. For the experienced scriptwriter, the 
flow chart of the system on page A30 may be useful in 
gaining a better understanding of how the system works. | 
must add a word of warning to all. The ELIZA system is 
constantly being changed and improved, so that within a 
short time there will probably be sections of the manual 
that will be incomplete or incorrect. The Education 
Research Center will be able to supply information regarding 
any changes. 


1. Joseph Weizenbaum, "ELIZA - A Computer Program for the 
Study of Natural Language Communication Between Man and 
Machine" in Communications of the ACM, Volume 9, Number 1, 
page 36, January 1966. 

Ve Joseph Weizenbaum, "Contextual Understanding by 
Computers" in Communications of the ACM, Volume 10, Number 
8, page 474, August 1967, 

3. Edwin F. Taylor, "The ELIZA Program: Conversational 
Tutorial" in 1967 JEEE International Convention Record, 
Part 10. 

4, Paul R. Hayward, Flexible Discussion Under Student 

in the ELIZA Computer Program, Bachelor's Thesis, 
M.1.T. Department of Physics, June 1907. 


Chapter 1 -- THE BASIC ELEMENTS 


The basic problem in natural language conversation Its 


the computer understand, as well as possible, 
aes is saying. In the ELIZA program, this is 
done by searching for certain "key" words and patterns in 
the input--the student's part of the dialogue. An important 
property of ELIZA is the fact that the rules for analyzing 
and responding to the input sentences are not part of the 
ELIZA program itself, but are treated as data. They form 
what is called a script, and are written in a specific 
format. This means that ELIZA Is not restricted to a 
certain set of recognition patterns and responses, or even 
to one natural language, for these are specified by the 
scripts and not by the program. 


A. The Script 


A script is divided into two sections. The keyword 
section contains the keywords, along with decomposition 
rules and reassembly rules (defined below), which are used 
in the analysis of the input. The rogram section contains 
labels and commands or functions that instruct the computer 
what to do when a student input is (or is not) "recognized". 


These include Printing, calculating, and storing 
information. Scriptwriting is the means of instructing the 
computer: "When he says this, you say that." 


B. An Example Script 


WOOD SCRIPT is a simple Script that illustrates some of 
the basic Properties of a script. 


WOOD SCRIPT 


(CHAIR (10 CHR ( 
(O NOT 1 CHAIR 0) (IT ISA 4.) xx 
(O CHAIR 0) (IT tS A Vy 
) NOKEY )) 
(TABLE (TBL ( 
(0) CIT Is NoT A TABLE.) xx 
) NOKEY )) 
(PROG woop 
“cane TYPE ROP TOPCDAHIN) ). 
| AM THINKING OF AN OBJECT MADE 0 Ww 
FOUND IN A HOUSE. WHAT IS 1T.QQ '), rie 


*XX TYPE('YOU ARE WRONG, ' 
EM - .- SEMBLY), 
*¥Y TYPEC'YOU ARE RIGHT, ', SEMBLY) 
*NOKEY TYPE('NO. TRY AGAIN, ') , 
END) : 


a  —_OCs__ 


1. The Basic Elements 


A conversation might go like this: 


r eliza 

W 1051.5 

WHICH SCRIPT PLEASE 
wood 


| AM THINKING OF AN OBJECT MADE OF 
WHAT IS IT. QQ 
the floor 


NO. TRY AGAIN. 
a table 


YOU ARE WRONG. IT IS NOT A TABLE. 
it is not a chair 


YOU ARE WRONG, 
it Is a chair 


IT 1S A CHAIR. 
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WOOD FOUND IN A HOUSE. 


YOU ARE RIGHT. JIT IS A CHAIR. 

Here is how the computer uses WOOD SCRIPT to carry on 
its part of this conversation. 

The program is initiated by typing "r eliza" and 
walting for the response "WHICH SCRIPT PLEASE". The 
computer will usually type in CAPITAL letters, but jit does 
not matter whether the student uses CAPITAL or lower case 
letters. After typing the name of the script, two carriage 


returns must be made to signal the computer that the student 


has finished. This is true’ for 


makes. 


The script Is always started at the label START, 


some computer statement 
will 


is stored in the list named INPUT. 


is usually printed. 
then wait for a student response, 


every input the student 
where 

The computer 

which when received 
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C. Keywords, Decomposition, and Reassembly 


As the first step in Soe lyeloe the list aces isis 

uter scans the sentence for the presence o certa 
wards Sa in the script--these are the keywords. 
CHAIR and TABLE are the keywords in WOOD SCRIPT, If no 
keywords are found in the input, the system goes to the 
label NOKEY. This is the case with the answer "the floor 
If one or more keywords are discovered in the scanning, the 
computer takes the keyword with the highest rank according 
to a priority established in the script (see page 11). 


Associated with this selected keyword are a number of 
rules, which the computer now applies to the 
input sentence. The decomposition rules essentially 
determine whether or not the sentence fits a specific form 
or pattern. A non-zero positive integer included in these 
rules stands for that number of words. 0 (zero) stands for 
"any number of words, including no words at all", As an 
example, consider the decomposition rule: 


(O NOT 1 CHAIR 0) 


The rule is "any number of words followed by the word NOT 
followed by one word followed by the word CHAIR followed by 
any number of words", Thus, the answer "It is a chair" 
would not fit the rule, while the answer "it is not a chair" 
would fit the rule. There may be a number of decomposition 
rules associated with each keyword. The computer takes the 
first such rule associated with the selected keyword and 
determines whether or not it fits the sentence. If it does 


not, it tries the next one. If no rule fits the sentence, 
the system goes to the label specified at the end of the 
keyword structure, For the keyword CHAIR, this no 


rule label is NOKEY, When it is determined 
that a rule fits the Sentence, the sentence is decomposed 
into the parts specified by the rule, each part being 
numbered according to its location in the sentence for 
future reference. In the example, the sentence "it is not a 
chair" is decomposed in the following manner: 


1 2 3 4 5 
( (IT IS) (NOT) CA) (CHAIR) () ) 


The decomposed Structure is put ina list named DECOMP 
Associated with each decon iti 
v position rule is a 
a Seeker prc es how the decomposed input sentence is to 
ack together. It is composed of a series of words 


ies ree ae Benbers must be non-zero positive 
er 
aere ree oO the numbered, decomposed parts of the 


imple, the reassembly rule: 


Cee 
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(ITISA 4.) 


would reassemble a list to read (IT IS A CHAIR.), since 
CHAIR is the fourth part of the decomposed input. The name 
of the reassembled list is SEMBLY. 


After the reassembly is completed, the system goes to 
the label that follows the reassembly rule. In the program 
part of the script where the labels are located, certain 
programming functions and commands can be used in many 
powerful and complex ways. These functions are part of the 
OPL computer language (Online Programming Language) 
developed by Professor Weizenbaum, and will be described at 
length later (see the Appendix). One of their main and most 
used purposes is to print out a response to the’ student, 
which can be either the reassembly list or any other 
sentence desired. For example, at the label XX in the 
Program section of WOOD SCRIPT, the command 


TYPEC'YOU ARE WRONG. ', SEMBLY), 


causes the computer to type "YOU ARE WRONG." followed by the 
contents of the list SEMBLY. 


After the computer exectues the commands specified in 
the program section, control is returned to the student and 
the computer waits for another input sentence in response to 
what has just been printed. Then the process of searching 
for keywords and decomposition rules is repeated all over 
again. 


The Basic Elements 
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D. The Program 


The program of a script lies between (PROG (NAME and 
END). In this section, OPL functions or commands are used 
to instruct the computer to perform many different 
operations, from printing to arithmetic calculations. Over 
a hundred different functions are listed and described in 
the Appendix, but the scriptwriter needs to be familiar with 
only a few of these, especially at first. The most useful 
functions are listed below with page references to the 
descriptions. 


TYPE A22 
TXTPRT A23 
GOTO A26 
TOP AS 
NEWTOP A3 
POPTOP AG 
IF A20 


The section "General Characteristics of Functions" on page 
Al is also very important. 


Certain rules of format must be followed when writing 
the program section of a script. The first two lines must 


be: 
(PROG (NAME 
GOTO( POPTOP(DAHIN)). 
This is referred to as the PROG section. "NAME" Is the name 


of the script, and must consist of no more than six letters 
and/or numbers, the first character of which must be 2 
letter. In some cases, it is desirable to use more 
functions between these two lines, but these two must be 


included for the proper workin i i 
g of a scr . 
of the script must be: a Kraken oy 


END) 


his means "close a remainin ren es and closes the 
& parenthes , 


The functions of th 
€ program are perform 1 
by the computer, a process called uti att seg apeplivbat 
Several functions are usually executing the program. 


7 S needed to cause i 
Tiasested, teow the nae ree Each Rinctionl epg 
Gad, or a colon (:), The Me pt pale il ag 
functions IF and FOR. o 


used only for the 
function", The ee comma means "goon to the next 
program". This is reveiyg means Stop execution of the 


in 
mean "stop and wait for an Roe ees DY Che 


: computer to 
input from the 


console" (see 


ee  Lt—“i‘“‘—™SOC 
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pages 18 and 28 for the exceptions). Each function is 
usually written on a different line preceded by a tab, but 
this is not necessary. Different sections of the program 
may be indicated by labels. These are analogous to 
bookmarks, and allow the system to he directed to the marked 
location. Labels must consist of no more than six letters 
and/or numbers, the first character of which must be a 
letter. Labels must always be immediately preceded by an 
asterisk (*), and are followed by a_ function. When the 
system goes to a label, it means that the function following 
the label is executed. 


The following section of a program demonstrates some of 
these points: 


*XY32 TYPE('WHAT ELSE '), 
NEWTOP('(FREE C), STORE). 
*CONSTR POPTOP(STORE), 
GOTO xY32 . 


Assume that the analysis of the input caused the system to 
go to the label CONSTR. The function POPTOP(STORE)--never 
mind for now what this function does--is executed, and since 
it is followed by a comma, the function GOTO XY32_ Is 
executed. This causes the system to go to the label XY32. 
It does not matter that GOTO XY32 is followed by a period, 
since the system transfers to XY32 before encountering the 


period. Now the function TYPE('WHAT ELSE ') is executed, 
and since it is followed by a comma, the function 
NEWTOP('(FREE C), STORE) is executed. The system now 


encounters the period following this function so exectuion 
of the program is stopped. Since the computer will usually 
stop and wait for a student input when a period is 
encountered, each small section like this should usually 
contain a printing function somewhere between the input 
analysis label and the period so that the student will know 
that the machine is now waiting for him. 


The last command preceding a label does not need to be 
followed by a period. If followed by a comma, for example, 
the computer will execute that command and then the command 
following the label, ignoring the label. This allows” the 
computer to enter in the middle of a series of commands, and 
is sometimes very useful. 


Each script must contain the special labels START and 
NOKEY, since the system assumes that these labels exist. 
When a script is started from WHICH SCRIPT PLEASE, it begins 
with the function following the label START. If no keywords 
are found in an input (and there is no keyword named NOKEYS, 
see page 12), the system goes to the label NOKEY. 


Tabs, spaces, and carriage returns do not affect the 
Program, except to act as separators between characters. 


—_—_~S—s—S— est 
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For example, 3 tab is usually used to separate 2 label from 
the function that follows it. 


Comments that are not a part of the program may be 
included by putting them between sets of jouble slashes 
(//). They are not considered part of the script when it is 
being played, hut will appear in a printout of the script 
For example: 


//THIS 1S THE NOKEY SECTION OF THE PROGRAM// 
*NOKEY TYPE(' PLEASE REPHRASE YOUR ANSWER. '). 


This comment is intended for the human programmer reading 4a 
printout of the script. When the computer encounters this 
section in the course of executing the program, the 
characters Included between the double slashes will be 
ignored. 


1. The Basic Elements PAGE 9 


—E. The Use of Variables 


Variables are used in a program, to provide an 
identifier for information that is needed by the script. 
For example, one variable might be used to keep track of a 
student's score for the purpose of directing the 
conversation to harder (or easier) material. Another 
variable might be used to identify a fragment of text to be 
printed. 


Variable names must consist of mo more than six 
characters, which may be any combination of letters and 
numbers that starts with a letter. The following are valid 
variable names: X, COUNT, TXT1, ABCXYZ, SCORE, H32JQ9. 


The value of a variable can be a number, a word, or a 
list of words and/or numbers. A word or number is referred 
to as a datum, and must consist of six characters or less. 
A list provides a means for storing information that is 
longer than six letters, and is usually indicated by 
parentheses enclosing information. For example: 


(THERE ARE 3 APPLES) 


is a list, while any one of the words in the list is a 
datum. A variable is usually given a_ value by using an 
equal sign (=). Use of the equal sign in the program means 
“replace the value of the left side by the value of the 
right side". For example, X=X+l is a valid statement that 
increases X by 1, even. though it is, strictly speaking, 
algebraically meaningless. This is called an s 

. When referring to words or lists in the program 
as literal elements rather than variables, an apostrophe (') 
is used immediately preceding the element. For example, 
A="B sets the value of A to be the letter B, while A=B sets 
the value of A to be the value of B. 


TXT1="(THERE ARE 3 APPLES) 


is an example of a list referred to as a literal element. 
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F. Input Conventions 


When typing .input on the console, the signal that ee 
input is completed is two successive carriage ver baie 
single carriage return does not end the input, so inpu 
continue for several lines if necessary. 


If a mistake is made, it may be erased by using the 
following symbols: # and “erase the single character 
preceding their use. Multiple use of # or erase that many 
preceding characters. For example, the input 


nwfow is the tme""ime for all gd me####ood men to come 
will be read by the computer as 
now is the time for all good men to come 


The symbols @ and ? erase the entire preceding part of a 
current line. The user should continue typing without 
carriage return. For example, the input 


today istues@trommor?tomorrow is friday 
will be read by the computer as 
tomorrow is friday 


If the input has gone on several lines and the user wants to 
erase all of it, he should type $ as the last word of the 
wrong input and make two carriage returns. The computer 
will then forget the wrong input and type READY. The 
correct input can then be typed. For example: 


this Is a dmemonstration of the way to 
erase an input when a mistake $ 


READY 


this is a demonstration of the way to 
erase an input when a mistake has been 
made in a previous line 


Do not use any of t 


hese symb e"@ 
other than erasing. yaeO TES ¢ @ 7) 


for any purpose 


When a single dollar si 
ign ($) 
CoE aba oe I Deets hed execute the rest of the 
gram. his may be used by the 
check the contents of lists or the value of 


variables, for exam 
ple. 4 ; : 
computer will type READY st Sees 's_ completed, the 


appropriate input. and the user should type the 


is typed as the first 


Chapter 2 -- USING KEYWORDS 


A. The Format 


The format for writing keywords with associated 
decomposition rules and reassembly rules in a script is 
shown below: 


KW = keyword 

OR = decomposition rule 
RR = reassembly rule 

: = more of the same 


(KWL (precedence no, keycode ( 
(DR1) (RR1) labell 
(DR2) (RR2) label2 


(DRn) (RRn) labeln 
) no DR label )) 


(KW2 //same structure// 
(KW //same structure// 
(PROG (NAME 


GOTO( POPTOP(DAHIN)) 
//the program section// 
END) 


B. Keycodes 


Immediately preceding the third left parenthesis of 
each keyword is the keycode. This is a word of six letters 
or less that must be unique for every keyword in the script 
since the system uses it to identify individual keywords. 
The keycode is usually mnemonic, such as the keycode CHR for 
the keyword CHAIR in WOOD SCRIPT (see page 2), bue) oe gen 
actually be any unique combination of letters. The keycode 
may be the same as the keyword if the keyword is less than 
six letters. 


C. Precedence Numbers 


Keywords may be ordered according to their importance 
ina script. This is done by including a precedence rena 
following the second left parenthesis In the eer 
structure. This number may be any Raper new gh pat he 
If the number is omitted, the system ass 
Shilsteare hmber. For example, in WOOD SCRIPT, the Kewors 
CHAIR is more important than the keyword TABLE, since eee 
is the right answer. Therefore, CHAIR: is given a igher 
precedence number (10) than TABLE (0 since omitted). 
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D. NOKEYS 


Sometimes it is helpful to use decomposition rules on 
an input that does not have any keywords. For example, when 
anticipating numbers within a certain range in the input, 
there are too many possibilities to have a keyword for each. 
See page 14 for a description of the detection of numbers 


with decomposition rules. Decomposition rules may be used 
on such an input by including the keyword NOKEYS In the 
script as a regular keyword. If no keywords are found in 
the input, the system will look for the keyword NOKEYS. if 
it is present, it will be treated as a regular keyword. if 


it is not present, the system will go to the label NOKEY. 
the follow Loe keyword structure is an example of the use of 
EYS. 


(NOKEYS (NOKEYS ( 
(0 DESK 0) (2) Xx 
(QO FLOOR 0) (2) Xx 
) NOKEY )) 


The no decomposition rule label should never be the label 
AGAIN (see page 53), since this will result In an_ Infinite 
loop. This label should usually be NOKEY. 


E. The Keystack 


When the input Is processed, the s 
ystem scans it from 
Pr pasa ke looking for keywords. The keywords that are 
iReaeen e pected in the order of their occurrence in the 
ape (AD Ue Sa A the - If a keyword ts used 
Or e in an input, it will be put on the keystack 
npr MA es as it is used. See the section "Keyword and 
e Analysis Functions" on page Al3 for a description 


of the functio 
Keyetack: ns that can be used to manipulate the 
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F. Keyword Phrases 


Keywords may be single words, or they may be phrases. 
Integers, written as (*N), may be used with the same meaning 
as in decomposition rules, that is, they stand for that 
number of words. “Any number of words" is written as (*0). 
The only requirement for a keyword phrase is that it start 


with a word and not a number. For example, the keyword 
phrase: 
(SALT (*1) PEPPER (*0) SUGAR ( etc. 


is read as "the word SALT followed by one word followed by 
the word PEPPER followed by any number of words followed by 
the word SUGAR". The keyword phrase must start with a word, 


G. Substitutions 


Keywords that have the effect of making substitutions 
in the Input may be included in a script. For example, if a 
number of different words have the same meaning, use of 
substitutions will save duplication of effort in writing 
keywords and decomposition rules. There are several forms 
of the substitutions. The words TURF, GRASS, and FIELD are 
used as examples. 


(TURF = GRASS) simple substitution 


When TURF Is found in the input, it Is replaced by 
GRASS. GRASS Is not treated as a keyword and is not put on 
the keystack. When decomposition rules are applied, the 
substitution has already been made, so GRASS must be used in 
place of TURF where needed. This form may be used to delete 
words or symbols from the input by leaving GRASS blank. For 
example, (, = ) would remove all commas from the input. 


(TURF = GRASS .) substitute and rescan 


TURF is replaced by GRASS, and the system checks to see 
if GRASS its a keyword. If it is, it is put on the BSYeLaSk 
This may be used to allow the computer to accept comm 
misspellings, such as (FEILD=FIELD.). If both (TURF=GRASS. 
and (GRASS=FIELD.) are included in the keyword section, 
FIELD will be put on the keystack if it is a keyword. 


(TURF = GRASS(4O (FIELD))) substitute and treat as the 
keyword FIELD 


TURF is replaced by GRASS and FIELD is put on the 


keystack with the precedence number 40. (f FIELD fs es 
highest ranking keyword, the actual keyword structure P or 
FIELD is found and the decomposition rules applied. ! a 


precedence number is not included, it is made 0 (zero). 


OO 
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Chapter 3 -- USING DECOMPOSITION RULES 


A. Different Forms 


The following forms may be used as single elements in 
decomposition rules for the described purpose. 


(*GO GOES GOING) 


Any of the three words GO, GOES, GOING used in this 
place in the input will fit this part of the decomposition 
rule. Any number of words may be used following the 
asterisk (*). 


(/MALE FAMILY) 


This form is called a tag list. A word will fit this 
part of the decomposition rule if it is a part of the 
categories MALE and FAMILY. The categories are specified in 
the keyword section by a description list of the keyword. 
For example the keyword (BROTHER DLIST(/MALE FAMILY SIBLNG)) 
identifies BROTHER as belonging to the categories MALE, 
FAMILY, and SIBLNG. These words are the tags, and must 
consist of six letters or less. They do not need to be 
mnemonic, although these are. Inorder to fit part of a 
decomposition rule of this form, the tags on the ODLIST of 


the keyword must include all the tags on the tag list in the 
decomposition rule. 


(COND expression ) 


This form can be used to detect numbers. "Expression" 
may be a Boolean expression. The Boolean operators €, LE, 
GE, L, and G may be used. For example, (COND L 7 AND GE 5) 
means "a number less than 7 and greater than or equal to 5". 

Lists may be detected if “expression" is the word LIST. 


A list is indicated in an i 
nput 
treated as a single element. fe YC ree 


Numbers that are within a certain r 
See my also be detected. In this son Sh Ssvasviae 
eeecltles Hee Fl F2, where Fl and F2 are numbers. F2 
this part of the doegee ee nee around Fl. A number will fit 
eri aa Se comba stor rule if it is within (either 
(COND EPS § 21) mesueesne not, the number F1. For example, 
number between 3.6 and 1 ie ad MATES aS R OPW OC ony 
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$ 


The dollar sign is used to indicate "any number of letters, 
but at least one letter" and may be used as a prefix, as a 
suffix, or in the middle of a word. For example: 


MEANS any word which begins with the letters MEAN (e.g., 
meant, meanwhile) 

$BALL any word which ends with the letters BALL (e.g., 
baseball, football) 

$RING$ any word which contains the letters RING (e.g., 
earrings, fringe) 

DOSING any word beginning with the letters DO and ending 
with the letters ING (e.g., donothing, doubting) 


The following decomposition rule demonstrates the use 
of these forms: 


(0 (COND E 3) (/MALE FAMILY) 0 (*GO GOES GOING) TO$ 0) 


It means “any number of words followed by a number equal to 
3 followed by a word which belongs to the categories MALE 
and FAMILY followed by one of the three words GO, GOES, or 
GOING, followed by a word beginning with the letters TO 
followed by any number of words". 


B. Ordering 


When the highest ranking keyword in an input is found, 
its decomposition rules are applied beginning with the first 
continuing to the last or until one is found to fit. Thus, 
an ordering of decomposition rules will help in analyzing an 
input. Generally, the most important rules should be placed 


first, since these will be the first applied. Also, che 
most general rules (the ones that will fit the most Pate as 
should be placed last. In particular, if the rule (0 is 


used, it should always be placed last, since it will fit any 
input, 


——————— “~“" 
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Chapter 4% -- USING REASSEMBLY RULES 


A. General Uses 


There are two general uses of reassembly rules. 
first use is to form a sentence from the input to be printed 


back by the computer. This use is shown in the 
decomposition rule and reassembly rule pair: 


(0 1 0 LOVE 0) (WHY DO YOU & 5) 


To cause the reassembly list to be printed requires a 


command in the program section. 


The second general use of reassembly rules 


extract information from the input, but not necessarily 
print back to the student. The following decomposition rule 


and reassembly rule pair shows how the value of X 
extracted from the input: 


(0 X 0 EQUALS 1 0) (5) 


The _reassembly list will contain the one word 
immediately follows the word EQUALS in the input, 
presumably the value of X. 


——< = — tS 
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B. Decomposed Words ($) 


When the dollar sign is used as part of a decomposition 
rule (see page 15), the reassembly rule may be used to 
extract all or parts of the word. The word that is 
decomposed is split into parts by the dollar sign. For 
example, the decomposition rule (DO$ING) would separate the 
word DOUBTING into three parts: DO UBT ING . These parts 
may be referred to in the reassembly rule by a list of the 
form (N1,N2). Nl is the integer that stands for the place 
of the word in the decomposed input. N2 is the integer that 
stands for the part of the decomposed word. For example, if 
the decomposition rule 


(0 DOSING 0 $RING$ 0) 
were applied to the following input 


HE 1S DOUBTING THE EFFECTIVENESS OF THEIR STRINGENT 
MEASURES 


the different parts of the decomposed words could be 
referred to by the following pairs of numbers: 


(2,1) dO 
(2,2) UBT 
(2,3) ING 
(4,1) ST 
(4,2) RING 
(4,3) ENT 


If it Is desired to put parts of the separated word back 
together, a dollar sign should be used in the reassembly 
rule between the pairs of numbers that refer to the Pere 
For example, to put back together the first two parts of : eS 
decomposed word ST RING ENT , the reassembly rule should be: 


( (4,1)$(4,2) ) 


The reaasonbly Vet would) be: CSTRING) oul talc Jaycesiires ie 
refer to the whole word that has been jlecomposed, a SIng 

integer referring to the place of the word 
input (i.e. N1) should be used alone. 
rule (4) would result In a reassembly 


in the decomposed 
Thus, the reassembly 
list (STRI NGENT). 
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Chapter 5 ~~ USING THE PROGRAM 


A. Execution of the Program 


The result of the analysis of an input is usually the 
specification of a label referring to a place in the program 
section of the script. This label is put on the top of a 
list called DAHIN (German for "there") by the system. The 
system transfers control to the program section by executing 
the program. This means that the functions in the program 
are executed sequentially beginning with the first one. 
Since the first function in the program section is usually | 


GOTO(POPTOP(DAHIN)). 


execution of the program will cause the label on top of 
DAHIN to be taken off and the system to go to that label. 


When a period is encountered in the program section, 
execution of the program is stopped. This is usually 
interpreted by the system to mean that it should wait for 
another input. However, there are certain exceptions. When | 


execution is stopped, the system checks the list DAHIN. if 
it is empty, and the variable KEY is zero (see page 28), the | 
system waits for an input. If there is a label on top of | 


DAHIN, the program is executed again, which has the effect 
of sending the system to that label. For example: 


NEWTOP( "START, DAHIN). 


would cause the system to go to the label START the same 

st fect as the function: GOTO START. If the system finds 2 

Mee on b9B of DAHIN, | it assumes that this indicates 4 

sereNie ional transfer + which is useful when more than one 

ae Ber etee (see "Changing Scripts" on the next page.) 

peeve assumes that the list contains a label and the 
7 ascript. This could be done, for example, by: 


NEWTOP('(START WOOD),DAHIN) 


In thi 
Ler Na lg ae checks to see if the bottom element, 
if it ts, of the script that is being played. 


the li 
e.g. START, and the procran, |S replaced by the top element, 
© program is executed again. If it ts not 


the same, tt 

empty. antes chen aaah ss the situation as if DAHIN were 

that the system will st is put on DAHIN, it has the effect 
g0 to the label on the top of the list 


only when the scri 
i * cript wh ® : 
is being played, whose name is on the bottom of the list 


This checki 

ng procedure j - 
other aspects of the operation aeranmatically along 
e System" on page A30 — 


with 


" 
Flow Chart of th system in the 
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B. Group Areas 


The ELIZA system provides a number of group areas where 
scripts may be located in a playable condition, even though 
only one script may be played at a time. The name of each 
group area is SA(N) where the groups are distinguished by 
the integer N. The control script (see Chapter 6, which 
begins on page 35) Is always located In group area SA(0). 
The script specified in response to WHICH SCRIPT PLEASE is 
read or brought Into group area SA(1). Other scripts may be 
brought into other areas, either by using the function 
SCRIPT or by ustng the control script. The value of the 
variable SCRPN(N) Is the name of the script in group area N. 
If there is no script In a particular area, the value is 0 
(zero). The name of the keystack of each group area is 
KA(N). The variable GROUP is always equal to the number of 
the presently active group area where the script that is 
being played Is located. Thus if the scriptwriter wants to 
refer to the presently active keystack, he should write 
KA(GROUP). The number of group areas is indefinite, but if 
more than three or four are used (depending on the size of 
the scripts), the available space in the computer core 
memory will be exhausted. 


C. Changing Scripts 


To change a script means to make a different script 
active by switching control of the conversation to it. 
Scripts may be changed for a number of reasons. The 
scriptwriter may wish to change the subject of discussion to 
something covered In another script. With the new script 
will come a new set of keywords and decomposition rules. {t 
is also easier to program and correct a number of small 
scripts rather than one large one. 


In order to change scripts, four things must be done Le 
the scriptwriter is going to program the change yUns.e | 5 
(An alternative method using the control script is descri . 
on page 48.) (1) The script must be read poe, & f 
appropriate group area by using the function SCRIP {se 
page A24). DO NOT read a script into the group ae w Heal 
the presently active script is located! (2) Set GR Be Baie, 
to the number of the group area where the new scrip eve 
located. (3) Put the label where the system should ze a She 
new script on top of DAHIN. (4) Include a period to e 
system to stop executing the program. For example: 


SCRIPT(2, ‘ELEVTR), 
GROUP=2, 
NEWTOP('START,DAHIN) « 


to read the 


a . % z 
This series of commands causes the compute yey ea 


Script named ELEVTR into group area SA(2), to 


+ i nd to 
control to area 2 (when the period is encountered), 4 
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go to the label START in the program section of ELEVTR 
SCRIPT. The order of the three commands is not important. 


D. Variables and Scripts 


When the scriptwriter is using a number of scripts, it 
is important to distinguish the variables "known" only to 
one script from those "known" to all scripts. For example, 
the variable X might be used to keep track of the number of 


wrong answers the student gives in each script. ik, is 
used for this purpose in different scripts, the system 
should know that there are in effect different Xs. The 


variable Y might be used to keep track of the total number 
of wrong answers in all scripts, and the system should know 
that when Y is referred to in different scripts, it Is the 
same Y. The functions that enable the scriptwriter to 
distinguish these cases are COMMON and OWN or OWNLIST. 
COMMON should contain the names of all the variables that 
should be known to all scripts. For example: 


COMMON(Y, STOUT, STOUTN, PLACE, SCRNAM), 


tells the computer that the variables Y, STOUT, STOUTN, 
PLACE, and SCRNAM are to be known to all scripts in common. 
The common variables are usually, but not always, listed In 
the first script to be played. 


OWN and OWNLIST provide differe 

, nt ways to specify | 
varntatlee to be "bound" or known only to the script that 
SNS hudes the statement. OWN is used when specifying the | 
ariables without giving them values. For example: 


OWN(X,OLDLAB, OLDNAM, ) 


sewteetce computer that the variables X, OLDLAB, and OLDNAM 
statement ecdrs pul to the script in which the OWN 
Seetod "ce urs. he last variable must be followed by @ 

-&, “OLDNAM."). OWNLIST is used to give values to 


some of the variabl] 
script. For examptai’ as well as making them, local, to. .the 


OWNLIST(X,OLDLAB,OLDNAM. ) AND (J=1) (mMTA="(A LIST)), 


tells t 

a Wi cto aoe that the variables X, OLDLAB, OLDNAM, J, | 
OWNLIST StatererE corey to the. script in which the 
the value of J enuaic tena It also tells the computer to set 

to the list (A LIST), Ata to set the value of MTA equal | 
by OWNLIST should 


be included in the first set of 


Again, the last variable in | 
y a period, Each list following | 
Statement for 4 


x i . 
Variable. nelude an assignment 
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COMMON, OWN, and OWNLIST differ from other OPL 
functions in that they are executed before the program 
section Is executed. This means that it does not matter 
where they are located in the program section, for they are 
executed when the script is read in and before control is 


transferred to it. Their values may then be changed in the 
script as necessary. 


E. Subscripted Variables 


Subscripted variables provide a simple notation for 
vectors and matrices. If the variable is to be a 
one-dimensional array or vector, the form is: 


B='( ARRAY) 


For multi-dimensional arrays, the maximum values must be 
given in the form: 


C="(ARRAY 10 9 15) 


This creates C as a 10 by 9 by 15 array. There is no limit 
to the number of fimenstons or the maximum values, but 
neither can be infinite. The subscripted variable is now 
referred to by statements of the following type: 


B(7) = C(4,5,1) + 10 


This command says “set the value of the seventh component of 
the vector 8 equal to the value of the element located at 
position 4,5,1 of the array C plus the number 10. The 
subscripted variable may appear in = any place that a 
non-subscripted variable may appear, including as an 
argument of a function. The subscripts may be any OPL 
Program that results in a numerical result. For example: 


X = C(SQRT(X), X/Y+1, 3) 


is a valid statement. 


————x<— ts 
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F. Context Awareness~~The TABLE Mechanism 
Descr ption 


It is often useful when writing scripts to be aware of 
which question or statement the person who Is playing the 
script is responding to. It is also useful to use the same 
keyword and decomposition rules in analyzing responses to 
more than one question, where the computer response is 
determined by which question was asked as well as_ by which ] 
decomposition rule fits. A simple example (illustrated 
below) is a script that asks a series of questions expecting 
yes or no answers, and selects the next question on the 
basis of the preceding answer. 


The ELIZA mechanism that makes this “context awareness” 
possible involves additions at two points in the script. 
The first is in the program section, at the point where the 
question is asked. The other is In the decomposition rules 
that will fit possible answers to the question. 


In the program section, use is made of a list whose 
name is TABLE, which is known by the ELIZA system. A list 
containing pairs of words is put on the top of TABLE. The 
first word of each pair is called a tag, which can be any 
combination of six letters or less. The tag will be used 
for detection in the decomposition rules. The second word 
of the pair must be a label in the program section of the 
scr et This label is the location in the program to which 
eneesye em will go if the tag is detected. For example, in 

CRIPT (page 25) the tags and labels are put on the 
list TABLE following the label START: 


NEWTOP('(YYY B NNN C O'E D), TABLE) | 


LA 2 

ae sehvarae and B is the label associated with it; NNN Is 2 
tag which sethei ti acclan (les as with it; O'E is a special 
is the label associated Por apd is discussed below) and ? 


In the decom 
positi 
statements of the person whocwitt ple that match possibie 


put in play the s re 
rule. A aga fees associated with o notlets eee 
by the contents of ue by Including the word DLIST followed 
BAVHHEREMWITHIA Chee, oo et lon Vist. Ini parentheses 
under the keyword eas ty For example, in TESTI SCRIPT, 

S, the decomposition rule is written: | 


(0 YES 0 DLIST(YYY)) 


This associa 
tes a desc i 
the decomposition lettres 


gist that has YYY in it with | 


—< 
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The basic operation of the TABLE mechanism is to 
compare the list on the top of the list TABLE (which is 
given the name ELBAT) with the description list (if any) 
associated with a decomposition rule to see if there are any 
identical tags, and if not, to see if there is any O'E tag 
on that list. This is done following an input analysis. An 


input analysis will always yield one of the following three 
results: 


1. A keyword is found, and a decomposition rule fits 
the Input. When a decomposition rule fits an input, the 
reassembly rule Is performed. Then ELIZA checks to see if 
the decomposition rule has a description list, ana tf Tt 
does, ELIZA checks to see if any of the tags on the 
description list are also on ELBAT. If it finds a tag that 
is on both, the system goes to the label that is associated 
with the tag In the word pair on ELBAT. if there are no 
matching tags, ELIZA checks to see if there is an O'E tag on 
ELBAT. If there is an O'E tag, the system goes to the label 
associated with the O'E tag in the word pair on ELBAT. If 
there Is no O'E on ELBAT, the system goes to the label 
following the reassembly rule, as if the TABLE mechanism had 
not been used at all. There Is an important exception to 
this checking for the O'E tag. If the precedence number of 
the keyword is greater than or equal to 10000, the situation 
is treated as 1f there were no O'E tag on_ ELBAT. This 
permits the scriptwriter to override the TABLE mechanism 
when desired. 


2. A keyword Is found, but no decomposition rule fits 
the Input. ELIZA checks to see if there is an O'E tag on 
ELBAT, and if there is, the system goes to its associated 
label. If there is no O'E tag on ELBAT, the system goes as 
usual to the label specified at the very end of the keyword 
structure--the "no decomposition rule" label. Again there 
is an important exception. If the precedence number of che 
keyword is greater than or equal to 10000, the situation 
treated as if there were no O'E tag on ELBAT. 


3. No keyword is found. ELIZA checks to see if there 
is an O'E tag Ls ELBAT and, if there is, the system ote ie 
its associated label. If not, the system goes ; ° the 
keyword NOKEYS (see page 12), if it exists; otherwise 
system goes as usual to the program label NOKEY. 


In all cases, after TABLE is checked, ELBAT is taken 


r 
off, so that the tags and labels put on TABLE are there fo 
only one input. This usually empties TABLE. 

r ft “is 

In the case of labels such as NOKEY, howeve Ligat ls 


: Since 
usually desired to keep the list on TABLE. » ut 
the name of the last list taken off TABLE, Tt (C88 be P 


back on again by: 
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NEWTOPC ELBAT, TABLE) 


lf the scriptwriter wants to process an Input without using 
TABLE, he should write: 


LISTCELBAT), 
so that the system will not get confused with 2 previous 
list. 
The tags used are completely arbitrary. The only 


requirement is that the tag used in a list on TABLE must be 
the same as the tag in the description list of the 
decomposition rules the scriptwriter wants to detect. 


If a list of labels is used In place of a label, the 
system will go to the first label on the list the first time 
its tag matches, the second label the second time its tag 
matches, and so on. When the last label on the list is 
reached, it will be used for all succeeding times that the 


tag matches. For example, the following command could be 
written: 


NEWTOP('(YYY B NNN C OTE (D E F)), TABLE) 


rene? & tag is invoked, the system will go to label 0 
fice 1ee . me, label E the second time, label F the third 
ariel 3 os F the fourth time, and so on. This technique 
Sa cateats eejavold trapping the student when the script 
Steere ils to recognize his answer. When a label |5 

such a list, the system also takes the first 


occurrence of that label off i 
example, if the list 2 nF OR AN a ie 


CYYY B NNN (C D E F) OTE (D E F)) 


is put on TABLE d ’ 
input, the Syscderatti O'E tag Is invoked following 


SRE Pecan ies go to the label D the first time and | 


(YYY B NNN (C E F) O'E 


(E F)) 
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Example 
TEST1 SCRIPT 


(YES (YES ( 
(0 YES 0 DLISTCYYY)) (THAT'S GOOD.) A 
) NOKEY)) 
(NO (NO ( 
(0 NO 0 DLIST(NNN)) (THAT'S TOO BAD.) A 
) NOKEY)) 
(PROG (TEST1 
GOTO(POPTOP(DAHIN)). 
*START NEWTOP('(YYY B NNN C O'E D), TABLE), 


TYPE( "HAVE YOU STUDIED QUANTUM MECHANICS.QQ '). 
*A TYPE(SEMBLY), 


Quito). 
+B TYPE('DID YOU ENJOY QUANTUM MECHANICS.QQ '), 
LIST(ELBAT). 
*C TYPE('WILL YOU STUDY QUANTUM MECHANICS.QQ '), 
LISTCELBAT). 4 
*D TYPE(' PLEASE ANSWER EITHER YES OR NO. ), 


NEWTOP(ELBAT, TABLE). 

*NOKEY TYPE('PLEASE REPHRASE YOUR ANSWER. '), 
NEWTOP(ELBAT, TABLE). 
END) 


conversation one: 


r eliza 

W 1518.7 

WHICH SCRIPT PLEASE 
testl 


HAVE YOU STUDIED QUANTUM MECHANICS. QQ 
maybe 


PLEASE ANSWER EITHER YES OR NO. 
yes 


DID YOU ENJOY QUANTUM MECHANICS. QQ 
yes 


THAT'S GOOD. 
R 3.127+1.983 
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conversation two: 


r eliza 

W 1519.6 

WHICH SCRIPT PLEASE 
testl 


HAVE YOU STUDIED QUANTUM MECHANICS. QQ | 
no 


WILL YOU STUDY QUANTUM MECHANICS. QQ 
no 


THAT'S TOO BAD. 
R 2.187+1.624 | 


TEST1 SCRIPT and the conversations that follow it | 
demonstrate simply some of the uses of the context awareness 
ability of the TABLE mechanism. Conversation gone will be 
discussed, and conversation two will serve as an additional | 
example. In conversation one, the script Is called, and the 
system begins at the label START. A list containing the 
tags and labels in pairs is put on the top of TABLE, a5 
described above. The question “HAVE YOU STUDIED QUANTUM 
MECHANICS. QQ" is asked, and ELIZA waits for a response. | 
The answer "maybe" does not have a keyword of the script in 
it. ELIZA checks and finds an O'E tag on ELBAT, the top 
list on TABLE. The system goes to the label 0D, associated 
with the O'E tag on ELBAT. In the process, ELBAT is taken 
off TABLE, so TABLE {ts now empty. Following the 
instructions at label D, the computer prints "PLEASE ANSWER 
EITHER YES OR NO.", puts the list of tags and labels (which 
is ELBAT) back on TABLE, and waits for a _ response. This | 
time the response is "yes", which has the keyword YES, The 
decomposition rule (0 YES 0 DLIST(YYY)) is found to fit. 


Since this has a descri i a 
Ption list, ELIZA checks and fin 

iets the tag YYY is on both the description list and  ELBAT, 
puso Sau SECOMITABLE. The system goes to the Yabal 8 
pee ee with YYY on ELBAT. In the process, ELBAT is 
Peet atte ae TABLE is now empty. Following the 

Ms at label B 4 
"DID YOU ENJOY QUANTUM’ the computer prints the questio 


MECHANICS. " its for 2 
response. The response "yes" fits QQ and wa 


; the same decomposition 
then’ performs enerece, cee Vist on TASLE this. times ELIEh 
reassemb]1 A 
where SEMBLY is printed. MTHAT'S Gan goes to the label * 
Technique 
The tags 


in the descripti 
the Iapae necked every Bite the ry 
certain polntss seen ape 


list of a decomposition 
le is the one that fits 


: however, ar ly when 
in ’ e put on only 
the program section of the script are 
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reached by the system, and they stay on for only one input. 


The technique for using this mechanism effectively in 
scripts more complicated than TEST1 SCRIPT is to have only 
one specific tag in the description list for any one 


particular decomposition rule. Then, for each decomposition 
rule that would fit a possible answer to a question, the tag 
that Is in its description list and an appropriate label for 
the system to go to if the input Is fitted by the 
decomposition rule, are put as a pair on TABLE. This point 
Is the essence of the context awareness, since the 
scriptwriter knows what questions or statements will be 
printed out, and what responses he expects. TEST1 SCRIPT 
shows this technique in elementary form. In answer to the 
initial question "HAVE YOU STUDIED QUANTUM MECHANICS. QQ", 
(0 YES 0) and (0 NO 0) are the important decomposition 
rules. Their associated tags are YYY and NNN” respectively. 
If (0 YES 0) fits the Input, the system should go to the 
label 8. Thus, label B is associated with the tag YYY in a 
word pair put on TABLE. Likewise, the system should go to 
the label C if (0 NO 0) fits the input, so label cts 
associated with the tag NNN in a word pair put on TABLE. If 
any other form of input is typed, the system should go to 
label D, so label D is associated with the tag O'E in a word 
pair put on TABLE. All of this is accomplished by the one 
NEWTOP statement, which puts all of these word pairs finPone 
list on the top of TABLE. If there are more decomposition 
rules that the scriptwriter wishes to detect if they fit the 
input, this process of putting tags and labels on TABLE is 
simply extended by putting tags in description lists in the 
decomposition rules and corresponding pairs on TABLE. 
Another important example is the case where one 
decomposition rule is ambiguous in different contexts, 1.@+- 
where the scriptwriter may expect the same input to neve 
entirely different meanings. By putting different Paid 
with the tag that 1s In the description Vigkigot tne 
decomposition rule on TABLE in the different contexts, these 
contexts can be distinguished in the decomposition rule. 

One further use of the O'E tag ian MOTE ee tas 
The system will go to the label associated with an iWee ne 
if there are no matching tags on the description pas ie 
TABLE, regardless of whether or not 2 keyword is TRU RI aD 
the input or a decomposition rule is found to fit. ee ar 
O'E tag can be used to go to 4 specific label. Sr eaetton of 
the content of the input. Examine the following sec 
the program part of a script: 


newrop('(o'e FF), TABLE). 
*FF TXTPRT(' (THAT'S INTERESTING),0)- 
wait for 
then go. through. the 


sition rule analysis 
but since 


The perfod following the NEWTOP function means to 
an input from the console. ELIZA will 
normal procedure of keyword and decompo 
(including substitutions, whi 


ch may be important), 
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there is only an O'E on TABLE, the system will go to the 
label FF in the program section regardless of what the input 
is (unless the precedence number of a keyword in the input 
is greater than or equal to 10000). ELIZA will print 
"THAT'S INTERESTING" and continue with the program, 


G. Sentence Analysis 


Certain of the OPL functions can be used to analyze the 
contents of a list in the same manner that the system 
analyzes input. These are usually needed only for special 
purposes, since the keyword structure usually provides 
sufficient analysis. Readers unacquainted with these 
functions should omit the following summary and skip to the 
section on "Counters" below. The functions are described In 
detail in the "Keyword and Sentence Analysis Functions" on 
page Al3. 


Within the program of a script, the functions KEY 
WASKEY, and HIRANK can be used to locate a desired keyword 
structure. The system may then be Instructed to apply this 
keyword structure, consisting of decomposition rules, 
reassembly rules, and labels, to a certain list. This may 
be done in the following way. When the system encounters @ 
period in the program, it stops the execution. In addition 
to checking the list DAHIN (see page 18), the system also 
checks the variable KEY. If KEY is equal to zero, the usual 
case, the system will wait for an input. However, If KEY is 
ta Lal to zero, the system assumes that KEY is the list 
ets Soeeeete the keyword structure, and that the variable 

Ss the list to which the structure should be applied. 


The system then 
Processes th me wi that 
ieprocessees Inputs e list EXP in the sa ay 


Input may be re 
Processed in this manner. if. the 
keyword structure first applied by the system yields 


use 

tie reir eee the system can be instructed to apply 

daltowl ie He est ranking keyword on the keystack. The 
Ogram section demonstrates this procedure. 


z=0, 


HIRANK(KACGROUP), 0 
nt 
Z=HIRANK(KA(GROUP) 0-45 
K , 


(Rez ces 
THEN NEWTOP( ‘no 
KEY, DAHIN). 
EUSEIKEY=ZmIEXP= INPUT. 


When using th 

e TA 
be used to do ene 
Section. This is 
unit discussion sc 


mechanism, the defined function KKK mY 


Pe ents instead of this | progr 
rpos the 
ripts (see Pavers sacs label AGAIN in 
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The functions MATCH and ASSMBL may be used to apply 
decomposition rules to lists and to reassemble lists from a 
decomposed list. For example: 


IT=MATCH('(O NOT 1 CHAIR 0),1NPUT,LIST(PMOCED)), 
//DECOMPOSED LIST 1S PMOCED// 
IF IT .£. 0 THEN GOTO NEXTDR : 
ASSMBL('CIT 1S A & .),PMOCED,LIST(YLBMES)), 
//REASSEMBLY LIST 1S YLBMES// 
GOTO XX . 
#XX TYPE('YOU ARE WRONG. ',YLBMES). 


This program section decomposes and reassembles in the same 
way that the first decomposition and reassembly of the 
keyword CHAIR In WOOD SCRIPT is performed (see page 20% 


H, Loops 


When a scriptwriter wishes to program a certain 
operation a number of times, it is usually bad to write the 
program section for each separate use. This can take up a 
lot of space in the script and is laborious work if the 
number Is large. A programming technique called a loop may 
be used to avold these problems. The loop uses the same 
program section over and over again the required number of 
times. The last statement in the section sends the system 
to the top of the loop to perform the operation again. 
Within the section there should be a test that provides a 
way out of the loop. That is, the loop will continue until 
the test Is met; then the system will go somewhere else. 
The following program section demonstrates the use of the 
loop to print every other item in the list named TAB. The 
sequence reader functions are described on page All. 


S=SEQRDR(TAB), //ANITIALLZATION// 
*PQ XX=SEQLR(S), //T0P OF LOOP// 
iF XX aE WIL //TEST// 


THEN GOTO PR 
X=SEQLR(S), 


E(XX), 
eons fa // BOTTOM OF LOOP, GO TO TOP// 
*PR TYPE('END OF EXAMPLE ')- 


The loop can be used to perform operations a number ne bimes 
where the number is not known, 45 in the above eee er ae 
scriptwriter should be sure that the test WA el The 
some time, or the result will be an infinite pe hake (eee 
loop may also be programmed by using the FOR s 

Page A20). 


PAGE 30 5. Using the Progran 


1. Counters 


Counters may be used to keep track of the number of 
times a certain operation Is performed, such as right 
answers, wrong answers, or the number of times through a 
loop. The counter is a variable that Js increased by 2a 
certain number (usually one) each time the operation Is 
performed. Counters must be set to initial values before 
they are used. 


The following program section demonstrates the use of 
the variables R and W to keep track of right and wrong 
answers. The total score is computed as a percentage score 


where one-quarter credit is subtracted for each wrong 
answer. 

*START R=0, W=0, //(NITIALIZATION// 

*RTA R=R+1 . //A RIGHT ANSWER// 

*WRA W=W+l . //A WRONG ANSWER// 

*SCORE S=((R-W/4)/(R+W) )*100 


, 


TYPE('YOUR SCORE IS ' S). 
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J. Lists 
ELIZA is based on a list processing computer’ language 
called SLIP ("Symmetric List Information Processor") 
developed by Professor Weizenbaum. All inputs, keyword 


structures, and outputs, for example, are treated as_ lists. 
A list consists of a series of cells that are linked 
together. Each cell contains six characters, some of which 
may be blanks. If a word that is stored In a list is longer 
than six letters, the word is stored in two or more cells. 
For example, the list: 


T="(THE WEATHER 1S BEAUTIFUL.) 


is stored In the computer as a series of cells, where —- 
indicates a blank: 


THE-- 
WEATHE 


Each cell Is marked as to whether or not It is a word or 
part of a word (see page Al5), so that when the printing 
functions are used, the list will be printed in its onlainat 
form. The extra blanks, if any, are not printed. Each cel 
on the list Is stored in a certain location in the’ Comper 
nemory called the machine address of the cell. This ee PTR 
obtained for a cell by using the functions MADOBJ or SEQ' 
(see pages A6 and Al2, respectively). 


When a list is placed on another list, tbe Cust Vacs 
becomes a sublist of the other list. In the memory 8 put 
computer, only the name and location of the sublist sy in 
Fick al Relacenlinio tne other ast :..cnecsun li see netals sate 
its previous location. The name and location of the su 
serve as a pointer to it. For example, when 


NEWTOP('(1 THINK THAT),T) 
is written, the lists are stored in the computer as: 


THINK~ 
THAT-- 


BEAUTI 
FUL--- 


——————<<— 
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Sublists themselves may contain sublists, and this may 
continue to any desired depth. 


The preceding considerations about cells are Important 
when using functions that operate on individual cells in a 
list, such as the sequence reader functions (see page All). 


K. Special List Problems 


There are a couple of special aspects of lists that 
have caused problems to unwary scriptwriters. Consider the 
following program section: 


*M13Q X="(THIS LIST), 
TYPE(X), 
Y=X, 
MTLISTC(Y), 
GOTO M13Q . 


The list X is created by an assignment statement and stored 
in the computer. The TYPE function causes THIS LIST to be 
printed. The command Y=X gives Y the value of this same 
list, but does not copy it. That is, X and Y point at the 
pene list. Thus, after MTLIST(Y) is performed, both X and Y 
ese the same empty list, even though there was 10 
NTLIST(X). Also, when the system goes back to label M150, 
sick ue AY if X will be reset to (THIS LIST). However, 
eb rap : - the one that has been emptied, so that X still 
lasliied xian empty list. Thus, when the TYPE function Is 
hapighe Ss time, an empty line is. printed, which might 
ave been the desire of the scriptwriter. 


eS ee se Daa gd is concerned with list erasures. In 
system perlodically d available space for the program, the 
that is not Heed Hid does some automatic clearing up of space 
value of a vari 5 - Lists are erased when they are not the 

able, not a sublist of another list, and not 


pointed to b 
Sectton: y a function. Consider the following progra® 


be X="(FIRST LIST), 


X=" (SECOND 
corn ar LIST), 


When the val 
SECOND LIST, t ae 
anything. 


the Pikes rponeed from the FIRST LIST to the 
ST is no longer pointed to »Y 


JKL, the FIRST LIST ma beer aan, Loturns to she eh 
me peys been erased, and the storasé 

nt’ filled with something else: 
ay using different variables ‘¢ 

e lists are to be used more 


area to whi 
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These problems do not apply to variables whose values 
are data, rather than lists. 


L. Description Lists 


A description list is a list that is "associated" with 
another list. This means that the description list can be 
referred to by referring to the other list. When the other 
list Is printed, however, the description list is not 
printed. Thus, description lists can be used to store 
information in a sort of “invisible way since it will not 
be part of any output. 


There are two ways to make a description list. The 
first is to use the function MAKEDL (see page A9). The 
second is to use the word DLIST followed by the description 
list in the other list. For example: 


G='(THE OTHER LIST), 
MAKEDL(' (THE DESCRIPTION LIST),G), 


has the same effect as: 
G='"(THE OTHER LIST DLIST(THE DESCRIPTION LIST)), 


The DLIST may be used at any position in the other Tse 
The functions that are concerned with description ist, ars 
described on page AY. 


M. Paired Information 


In most of the description list functions, tt ar 
assumed that the description list is made up ° Pp pee ice 
data. In the function VAL (see page A9), this raareatenitt hrs 
made, even though it does not refer to 2 descrip i a icamnts 
The ability to refer to information stored 1a Ce ananaer 
sometimes helpful in scriptwriting. For examp San Wate 
the situation where the scriptwriter wants the sy enon EEE 
to one of a certain number of labels, depending er bese 
value of a variable. Assume that the value nee following 
number (spelled out) between one and five- he cae che 
Program section, the variable AA has been aoe to oe iin othe 
values one, two, three, four, OF five © ea tas values and 
course of the conversation. The list M4 conta 
labels as pairs of data. 

\ TART) 
ib="(ONE XX THO YY THREE XX FOUR M13Q FIVE S$ 2 
GOTO(VAL(AA,M4)). 
i ries 
r than using a se 
ote f the variable AA- 


This technique is much better and fa 
of IF statements to determine the value © 
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N. Long Printouts 


When there is a large amount of material to be printed, 
the function PRTLC ("print lower case") should be used 
instead of TYPE or TXTPRT. PRTLC causes a file that is 
stored on the disk to be printed. This means that the 
material to be printed can be stored on the disk rather than 
in a script in memory where there is less available space. 
PRTLC also has the advantage that more characters can be 
used: all the characters on the teletypewriter Including 
upper and lower case letters. The function PRTUC ("print 
upper case") can be used to print a file of only upper case 
characters. The formats of PRTLC and PRTUC are described on 
page A23. 
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Chapter 6 -- USING THE CONTROL SCRIPT 


A, The Control Script 


The control script is a very powerful device for 
increasing the computer's versatility as a tutor. When the 
control script is used, it is called into group area SA(0) 
and ordinarily remains there throughout a discussion. The 
control script does the following: 


1, Automatically adds often-used keywords (e.g. many 
variants of "yes" and "no") to every script played 
during the discussion (Section B). 

2. Allows the student to control the conversation by 
means of various interruptions (Sections C, D). 

3. Provides machinery for manipulating many small, 
easily-written "unit" scripts that carry on the 
discussion (Sections E, F, G, H). 


These services of the control script are described in detail 
In this chapter. 


B. Control Script Keywords 


The keywords of the control script are automatically 
added to each script while it is being played. ; The 
scriptwriter must use the proper method for bringing in a 
new script. This method is described in section F (1) on 
Page 48. Certain equivalences or substitutions fon fee 
words yes, no, and not are included in the control ser peas 
save programming for the scriptwriter. The following 
shows the equivalences contained in the control script. 


(DONT = DO NOT .) 
(WON'T = WILL NOT. ) 
(ISN'T = 1S NOT . ) 
(AREN'T = ARE NOT . ) 
(RIGHT = RIGHT ((YES))) 
(TRUE = YES.) 

(FALSE = NO.) 
(INCORRECT = NO.) 
(CORRECT = YES.) 
(WRONG = NO.) 

(OK = YES .) 

(SURE = YES.) 

(OK = YES.) 

(O.K. = YES.) 

(OKAY = YES.) 

(OF COURSE NOT = NO.) 
(CESTAINLY NOT = HO.) 
(OF COURSE = YES.) 
(CERTAINLY = YES.) 


zz —————— 


———— 
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(YEAH = YES.) 
(NOPE = NO.) 


(DON'T = DO NOT.) 
(DOESN'T = DO NOT.) 
(NOT DLIST(/NOT.)) 
(CAN'T = CAN NOT.) 
(CANNOT CAN NOT.) 
(DIDN'T DO NOT.) 


The substitutions ending in periods mean, for example, 
“substitute yes for yeah in the Input and resume checking to 
see if yeah is a keyword". The DLIST(/NOT) indicates that 
the word belongs to the category indicated by NOT, and any 
word in the category will fit a part of a decomposition rule 
that is (/NOT). (See the sections on "Substitutions", page 
13, and "Different Forms", page 14.) 


The following keyword sections for yes and no are 
contained in the control script, and thus included in all 
scripts while being used. 


(YES (YES ( 
(O(/NOT) 0 (*RIGHT YES) 0 DLIST (CONTRL NO NOQ)) 
(O (*YES RIGHT) 0 DLIST(CONTRL YES YESQ)) 
) AGAIN )) 

(NO DLIST(/NOT) (NO ( 


(O (/NOT) 0 NO O DLIST(CONTRL YES YESQ)) 
(0 (/NOT) 0 DLISTCCONTR 
Wwhaan ey 43 Ss L NO NOQ)) 


a ane sere be detected by using the TABLE mechanism. 
vie oe and NO should be used. YESQ and NOQ will 
au ie y be deleted. If yes or no is present in the 

put, and the appropriate tag YES or NO is not on the 


TABLE, th 
Reonariss label AGAIN will cause a search for other 


t 

Pe cine eet may cause keywords to be added to the 

Te thie te ieee y Using the function ADDKEY (see page Al3). 

conversatio de in the script called to start a given 
n (the initialization script"), the keywords 


will effectivel 
being played. y be a part of all scripts while they are 


Iti : 
for frequently missp especially helpful to add substitutions 


y spelled word 
topic under discussion. For ieee a particularly 


ADDKEY(SA(0), "(SCALER=SCALAR. )), 


The keyword 
s 
only during Piss Mos the control script in this way remain 
are not nade a rse of conversation with a single student 
permanent part of the control script. 


and 


ee Ul 
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C. Student Control by Interruption 


The control script contains not only commonly used 
keywords, but also some control keywords that allow the 
student to interrupt the conversation. These control 
keywords are added to every unit discussion script; 
therefore the student may use these control words at any 
time during the discussion. Depending on the type of 
control word used, the conversation may or may not return 
later to the point of interruption. 


All the control keywords used have a rank greater than 
or equal to 10000, so that they will override an O'E on the 
TABLE (see the section on the TABLE machanism, page 23). 
The decomposition rule label for each keyword is AGAIN (see 
page 53). In brief, the present control words are the 
following: 


"i understand" tells the computer to skip ahead to the 
following unit of discussion. 


"| do not understand" causes a search for remedial 
material provided by the scriptwriter. 


“go back" causes the computer to start the present unit of 
discussion again. 


"quit" causes the discussion to be terminated immediately. 


“when | say blt 1 mean bacon lettuce and tomato" eaUsee 
the computer to record and remember for the restiap 
the conversation whatever substitution or 
abbreviation the student uses for his own convenience 
(for example, bit for bacon lettuce and tomato). 


ribed more 


These control keywords and their synonyms are desc 
fully below, 


———=———— 
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10000 IMEAN 
(1 MEAN (10000 DMT AREAN 0 DLIST(CONTRL IMEAN)) 


The student is able to make substitutions and 
abbreviations of the form "when i say % i mean Y". A 
substitution of the form (X = Y .)_Is added to the list of 
keywords of all scripts including the control script while 
they are being used in the discussion. The computer 
response to a statement of this type is " UNDERSTAND. 
PLEASE CONTINUE." 


Understanding 
(AHA = | UNDERSTAND .) 
(UNDERSTAND (10000 UNSTAN ( 
(0 | 0 UNDERSTAND 0 DLIST(CONTRL UNSTAN)) 


CKNOW (10000 KNOW (¢ 
(0 1 0 KNOW O DLISTCCONTRL UNSTAN)) 


This section enables recognition of a student's 
indication of understanding. It assumes he means that he 
understands the present unit of discussion. Since the 
present level of discussion is therefore finished, the 
system is sent to the label FINISH (see section F). 


Lack of Understanding 


(UNDERSTAND (10000 UNSTAN (¢ 


(O 1 0 (/NOT) UNDERSTA ) 

a £010 CU8OTD ND 0 DLIST(CONTRL NUNST) 
(0 1 0 (/NOT) KNOW 0 DLIST(CONTRL NOTKN)) 

(REPHRASE=1 NOT DLIST(/NOT) UNDERSTAND (10000(UNDERSTAND))) 


These keywords should usually be 


with the TABLE (see page 22). When NUNST and/or NOTKN are 


placed as tags 
SAE PORRIa tS aRICES iin TABLE, the computer goes to the 


when the student indicates lack of 
HEL veh a cate rh ag aati ee 
ANSE TANYA GOR one ao eee meant CO CIES “TRY 10 


used in connection 


Go Back 


(GOBACK = GO BACK 
oP) 
(GO BACK (10000 GoBack ( 
(O DLIST(CONTRL GOBACK)) 
When the 
Sets eee pe odes wants to begin the present unit ¢ 


; the prese ipt i i i d 
the system is sent to the label START. eed |i) aan 


a 
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Quit 
(QUIT (10000 Quit ¢ 
(0 DLIST(CONTRL QUIT)) 
The student is able to quit the discussion and return 


to the CTSS command level. 
D. Overriding the Control Script 


It may be desired in some situations to ignore or 
override the whole keyword section of the control script 
that has been added to each script. Since the DLIST in the 
decomposition rule of every keyword contains the tag CONTRL 
(except those for yes and no), use of the tag CONTRL and a 
label as a pair in a list put on TABLE will send the system 
to the label If a control script decomposition rule fits the 
input. This effectively ignores the control script since 
the control mechanisms are overridden and not used. AGAIN 
would be a good label to use for this purpose. Individual 
keywords may be overridden by using the other tag in the 
DLIST (e.g., QUIT for the keyword quit) with a label as a 
pair in a list put on TABLE. 


———————— 
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E. Unit Discussion Scripts 


The method of input analysis used by ELIZA makes it 
relatively easy to program conversations that are linear in 
the sense that they follow 2 prescribed and predetermined 
line of argument. For long scripts this is undesirable, 
since one wants to adapt each conversation to the needs, 
desires, and depth of understanding of the individual 
student. The basic approach developed for use with the 
control script is to break the subject material into small 
units of discussion. The units are small and 
self-contained, so they may be ordered in any one of several 
ways. Other units may either follow or be used in the 
middle of a single unit. Many different branchings may be 
anticipated in a unit according to expected student 
responses to questions. With a number of units, each with 
multiple branchings, the number of paths the discussion may 
take becomes very large without the scriptwriter having to 
program each separate path in its entirety. 


Each unit of discussion is contained in @ single 
script. Within each unit, the context is limited to 8 
certain topic, and a linear predetermined discussion of only 


three or four interchanges may be used. Thus, each unit 
Sone is relatively easy to program, without losing overall 
lexibility. Also, since each unit. is independent, more 


units can easily be added to supplement existing units. 
F. Connections Between Units, Sub-scripting 


There are three ways that a given unit of discussion 
pelle Sigg First, the end of the one unit may be 
Dearoividke G ne course of conversation and the next 
Sones. ni etermined. Then the new unit Is called 
trom ass tearate end begun. Second, a new unit may be 
beeen Fa he le of another unit. Then the computer 1s 
stopped, and the remember where the original discussio? 
eoreey and the new unit is called. Third, when the new 
ieee sens Be ec eas original disucssion unit Is resumed. 
auicg eh aiscu on units are independent, they may be used 

entially or as sub-units of one another. 


It is hel i 

pful to 
nd n introduc m: level ind 
sub-level to characterize the aaa i 


eee foe method of usin discussion 
Dedhenctnlty te aS _on the same level if * hey follow 
above. Units e discussion in the first manner described 

are on a sub-level and are called = ; 


if they ar 7 eke 

DueteEn thave sr kee eee a ee eee area 

single discussio e two methods may b bined in ? 
sion, and sub-levels of Soskthte 


any depth desired. conversation used °° 


The technique developed for 


introduction of each unit of di controlling ‘ 
discussion can handle 2 wide 
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variety of structures of conversation. Particularly 
important is the fact that a discussion may continue on a 


sub-level through any number of units. When the 
conversation finally returns to the unit interrupted by 


going to the sub-level, it may return from a unit different 
from the first unit on the sub-level. 


The following conversation illustrates the use of 
scripts as units of discussion. It is designed to show the 
structure of a conversation programmed in this manner. The 
diagrammatic representation of the conversation shows the 
order in which the scripts are called and the function of 
each. Note especially that FOUR SCRIPT is not itself 
concerned with the guessing of the word COUPLE, and might 
just as easily be used to quiz a student on the alphabet. 


This is the essence of independent unit scripts. 
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Example Conversation 


r eliza 

W 2021.4 

WHICH SCRIPT PLEASE 
one 


THINK IT 1S. QQ 

pair 

NO, THAT'S NOT IT. 

double 

WRONG AGAIN. HERE 1S A HINT. 

WHAT IS THE THIRD LETTER OF THE ALPHABET. QQ 
c 

RIGHT YOU ARE. 

MY WORD BEGINS WITH THAT LETTER. TRY AGAIN. 
couple 

YOU ARE RIGHT. COUPLE IS THE WORD. 


THINK IT IS. QQ 
recent 


RIGHT. RECENT IS THE WORD. 


THIS 1S THE END OF THIS CONVERSATION, 
R 8.650+6.066 


Diagram of the Conversation 


(numbers stand for unit scripts) 


top level 1 


sub-level \ / \ / 


sub sub-level 


the Control 


1 AM THINKING OF A WORD THAT MEANS TWO, WHAT DO YOU 


THE WORD | AM THINKING OF HAS SIX LETTERS. TRY AGAIN. 


| AM THINKING OF A WORD THAT MEANS NEW. WHAT DO YOU 


Script 
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ONE 


(PROG 


*START 


*LEAL 


NISH 
ANGE 

*SUBSCR 
*QUIT 


*AGAIN 


*NOKEY 


the Control Script 


RIPT 


(ONE 

LABEL=POPTOP(DAHIN), 

GOTO(LABEL). 

STOUT="(CONCAT NWORD 9), 

STOUTN='(NOTYPE), 

OWN( PATH. ), 

PATH='(TWO FIVE), 

IF LEMPTY( PATH) THEN 
TYPE('THIS 1S THE END OF THIS CONVERSATION. 
GOTO QUIT : 

TYPE('LINE(1) '), 

NEWTOP('(LEAD ONE),STORE), 

PLACE='START, 

SCRNAM=POPTOP( PATH), 

GOTO SUBSCR . 

GROUP=0, NEWTOP('FINISH,DAHIN). 

GROUP=0, NEWTOP('CHANGE, DAHIN). 

GROUP=0, NEWTOP('SUBSCR, DAHIN). 

GROUP=0, NEWTOP('QUIT, DAHIN). 

KKK(KA(GROUP) ). 

GROUP=0, NEWTOP( 'NOKEY, DAHIN). 

END) 


PAGE 43 


Oy 


ll 
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Two SCRIPT 


(COUPLE ( 
ell (0 DLIST(COUPLE)) ¢) AGAIN 
| ) AGAIN )) 
(PROG (TWO 
LABEL=POPTOP(DAHIN), 
GOTO(LABEL). 
*START TYPE('I AM THINKING OF A WORD THAT MEANS TWO. 


WHAT DO YOU THINK IT 1S.QQ '), 
NEWTOP(' (COUPLE TWOA O'E TWOB), TABLE), 
*TWOA TYPE('RIGHT. COUPLE IS THE WORD. '), 
GOTO FINISH . 
*TWOB TYPE('NO, THAT'S NOT IT. "), 


PLACE='START, 
SCRNAM='THREE, 
GOTO CHANGE . 
*FINISH GROUP=0, NEWTOP('FINISH, DAHIN). 
*CHANGE GROUP=0, NEWTOP( 'CHANGE,DAHIN). 
*SUBSCR GROUP=0, NEWTOP('SUBSCR,DAHIN). 


*QUIT GROUP=0, NEWTOP('QUIT,DAHIN). 
*AGAIN KKK(KA(GROUP) ). 
*NOKEY GROUP=0, NEWTOP( 'NOKEY, DAHIN). 


END) 


tS 
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THREE 


(COUPLE 


(PROG 


*START 


*THREEA 


*THREEB 


*THREEC 


*THREED 


*FINISH 
*CHANGE 
*SUBSCR 
*QUIT 
*AGAIN 
*NOKEY 


SCRIPT 
(COUPLE ( 
(0 DLISTCCOUPLE)) () AGAIN 
) AGAIN )) 
(THREE 
LABEL=POPTOP(DAHIN), 
GOTO(LABEL). 
TYPE(' THE WORD | AM THINKING OF HAS SIX 
LETTERS. TRY AGAIN. '), 
NEWTOP(''(COUPLE THREEA O'E THREEB), TABLE). 
TYPEC'YOU ARE RIGHT. COUPLE 1S THE WORD. oy, 
GOTO FINISH . 
TYPE('WRONG AGAIN. HERE IS A HINT. '), 
PLACE='START, 
SCRNAM= ‘FOUR, 
NEWTOP('(THREEC THREE), STORE), 
GOTO SUBSCR 
TYPE('MY WORD BEGINS WITH THAT LETTER. 
TRY AGAIN. '), 
NEWTOP( '(COUPLE THREEA O'E THREED), TABLE). 
TYPE('YOU HAVE HAD ENOUGH GUESSES. 
COUPLE 1S THE WORD. '), 
GOTO FINISH . 
GROUP=0, NEWTOP('FINISH, DAHIN)« 
GROUP=0, NEWTOP('CHANGE, DAHIN). 
GRoUP=0, NEWTOP(' SUBSCR, DAHIN). 
GROUP=0, NEWTOP( "QUIT, DAHIN). 
KKK(KA(GROUP) ). 
GROUP=0, NEWTOP( 'NOKEY, DAHIN)- 


END) 
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FOUR 


(c 


(PROG 


*START 
*FOURA 
*FOURB 


*FINISH 
* CHANGE 
*SUBSCR 
*QUIT 

*AGAIN 
*NOKEY 
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SCRIPT 
(Cc ( 
(O DLIST(C)) () AGAIN 
) AGAIN )) 
(FOUR 


LABEL=POPTOP(DAHIN), 
GOTO(LABEL). - 
TYPE('WHAT IS THE THIRD LETTER OF THE ALPHABET. 00 
NEWTOP('(C FOURA O'E FOURB), TABLE). 
TYPE('RIGHT YOU ARE. '), 

GOTO FINISH 2 
TYPE('NO. TRY AGAIN, THIS SHOULD BE EASY. '), 
GOTO START . 

GROUP=0, NEWTOP('FINISH, DAHIN). 

GROUP=0, NEWTOP( "CHANGE, DAHIN). 

GROUP=0, NEWTOP( 'SUBSCR, DAHIN). 

GROUP=0, NEWTOP( 'QUIT, DAHIN). 

KKKCKA(GROUP)). 

GROUP=0, NEWTOP( "NOKEY, DAHIN). 

END) 


tO 
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FIVE SCRIPT 


(RECENT 


(PROG 


*START 


*FIVEA 


*FIVEB 


*FINISH 
*CHANGE 
*SUBSCR 
*QUIT 


(RECENT ( 
(0 DLISTCRECENT)) () AGAIN 

) AGAIN )) 

(FIVE 

LABEL=POPTOP( DAHIN), 

GOTO(LABEL). 

TYPE('! AM THINKING OF A WORD THAT MEANS NEW. 
WHAT DO YOU THINK IT 1S.QQ '), 
NEWTOP('(RECENT FIVEA O'E FIVEB), TABLE). 
TYPE('RIGHT. RECENT IS THE WORD. '), 
GOTO FINISH . 

TYPE('NO, THAT'S NOT IT. '), 
PLACE='START, 

SCRNAM='SIX, 

GOTO CHANGE 

GROUP=0, NEWTOP('FINISH,DAHIN). 

GROUP=0, NEWTOP( 'CHANGE, DAHIN). 

GROUP=0, NEWTOP('SUBSCR,DAHIN). 

GROUP=0, NEWTOP('QUIT,DAHIN). 
KKK(KA(GROUP) ). 

GROUP=0, NEWTOP( 'NOKEY, DAHIN). 

END) 
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In the programming of a unit script, there are three 
ways to call the next unit script. 


(1) It may be called as the next script on the same 
level as the present script. To program this case, the 
scriptwriter must set values for two variables, SCRNAM must 
be set equal to the name of the next script, and PLACE must 
be set equal to the label in that script to which contro] 
will be transferred. Then, control must be transferred to 
the label CHANGE. For example, in TWO SCRIPT: 


PLACE='START, 
SCRNAM='THREE, 
GOTO CHANGE . 


This will cause THREE SCRIPT to be read jin and contro) 
transferred to the label START. 


(2) The next script may be called as a sub-script as an 
interruption to the present script. In order to remember 
the point of interruption, a list containing the label to 
which control should be transferred when the present script 
is returned to and the name of the present script must be 
put on the top of the list STORE. SCRNAM and PLACE must be 
set to appropriate values for the sub-script, and control 
must be transferred to the label SUBSCR. For example, in 
THREE SCRIPT: 


NEWTOP('(THREED THREE), STORE), 
PLACE='START, 
SCRNAM='FOUR, 
GOTO SUBSCR . 


This will cause FOUR SCRIPT to be read in as a sub-script of 
THREE SCRIPT and control transferred to the label START. 
When that level of conversation is finished, control will be 
transferred to the label THREED in THREE SCRIPT. 


(3) From a sub-level, the interrupted script of the 
next higher level is called back in. The only statement 
required in this case is to transfer control to the label 
FINISH, since the information regarding the point of return 
was stored in the list STORE when the sub-script level was 
Started. For example, in FOUR SCRIPT: 


GOTO FINISH 


Semel Cause the ‘contro} script to read in_ the 


interrupted transfer control to the label 


ion for return. In this example, that 
THREED in THREE SCRIPT, 
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In summary: 


(1) Next script on same level--set SCRNAM 
CHANGE. NAM and PLACE, go to 


(2) Call a sub-script--put list containi 

ain : 
name for return on top of STORE, He Ne eo and script 
go to SUBSCR. cRNAM and PLACE, 


(3) Reached end of discussion in a script--go to FINISH 
4 SH. 
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G. Techniques of Using Unit Scripts 


Format 


In order for the control script to function Properly, 
the unit scripts must all have certain common labels and 
programming. To facilitate the writing of unit scripts, the 
necessary common program is provided in a script named UNIT 
SCRIPT. To write, for example, a unit script mamed ABLE 
SCRIPT, one begins with the commands indicated by the dashes 


(-) below: 


- ed] unit script 
W 1507.8 
Edit 

- file able 
* 


R 2.833+.900 


The other lines are computer responses. This produces a 
copy of UNIT SCRIPT filed under the new name ABLE, which can 
then be modified by editing (by EDL) to become a unit 
discussion script. To use the new copy, the scriptwriter 
must retype the first line to read: 


(PROG CABLE 


The keywords can be added above the PROG section, and a 
Program for the script added beginning with the label START. 
UNIT SCRIPT is shown below, 


UNIT SCRIPT 


(PROG CUNIT TYPEC('RETYPE PROG LINE *). 
LABEL=POPTOP( DAHIN), 
GOTO(LABEL). 
*START 
*FINISH GROUP=0, NEWTOP('FINISH,DAHIN). 
*CHANGE GROUP=0, NEWTOP( "CHANGE, DAHIN). 
*SUBSCR GROUP=0, NEWTOP( 'SUBSCR, DAHIN). 
*QUIT GROUP=0, NEWTOP( "QUIT, DAHIN). 
*AGAIN KKK(KA(GROUP)). 
*NOKEY Paes NEWTOP( 'NOKEY, DAHIN). 


i 


g, Using the Control Script PAGE 51 


Initialization 


The first script (specified in response to WHICH SCRIPT 
PLEASE) should be used for initialization. Values should be 
set for STOUT and STOUTN (see page 58) in this script, and 
other variables, especially counters, should be set to 
initial values. The list of common variables should be 
specified by a COMMON statement (see page 20). Initial 
statements and questions could also be included. The value 
of doing all of this in the first script is that everything 
will be done for all the scripts that follow. 


Led Discussions 


Discussions may be led by the computer by specifying a 
list of scripts in the order to be used. A script must be 
used to control the conversation by calling each script in 
turn as a sub-script, and specifying an appropriate point of 
return, In the example discussion, ONE SCRIPT controls the 
conversation with the following program section. 


PATH="(TWO FIVE), 
*LEAD IF LEMPTY(PATH) THEN 

TYPE('THIS 1S THE END OF THIS CONVERSATION. '), 
GOTO QUIT : 

TYPE('LINE(1) '), 

NEWTOP('(LEAD ONE), STORE), 

PLACE="START, 

SCRNAN=POPTOP( PATH), 

GOTO SUBSCR . 


The list of scripts is usually named PATH since the computer 
determines the path of the conversation. Each script is 
called in turn by POPTOPing a script name off PATH. The 
point of return from the sub-script level is specified as 
the label LEAD, which will cause the whole process to be 
repeated, When PATH is empty, the end of the led 
conversation has been reached. 


___ It is easy to have two or three possibilities for led 
discussions, and to give the student a choice among them by 
appropriate keywords and decomposition rules in_ the 
initialization script. The scriptwriter could also create a 
Special script, whose name would be the last one on _ PATH, 
which Would ask the student if he wanted to go on with 
another choice, If he does, PATH could be rederineds, 
Setting up another led discussion. This is one example 0 
the use of the last script on PATH to set up another PATH. 


Nenenbering the List on TABLE 


is When a label is used in the keyword section 
of tga on TABLE, the list on TABLE is taken off 
@ normal procedure (see the TABLE mechanism, pare 


and there 
as part 
22). 


a ———=<——— 
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In the case of labels such as NOKEY, however, it is Usually 
desired to put the list back on TABLE. After an input is 
processed, the name of the last list taken off TABLE is 
remembered as ELBAT and can be put back on again. In the 
unit scripts, the list is automatically put back on TABLE 
when the system goes to the labels NOKEY and AGAIN. If the 
scriptwriter wants to process an input without putting a 
list on TABLE, he should include the command LIST(ELBAT) for 
that input. Do not write MTLIST(ELBAT), since that would 
get rid of the labels. 


Long Units 


Long discussion units having more than three or four 
interchanges may be programmed by linking a number of smal} 
unit scripts together on the same level of discussion, This 
is done by setting PLACE and SCRNAM to appropriate values, 
and then GOTO CHANGE. 
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H. Other Mechanisms of Unit Scripts 


py using UNIT SCRIPT (page 50) as a model for writing 
unit scripts, the scriptwriter has available certain useful 
mechanisms. The purposes of the labels CHANGE, FINISH, and 
sugSCR have already been explained. The other mechanisms 
are described below. 


AGAIN 


This section causes the system to reprocess the input, 
looking for the next highest ranking keyword. Dts 
espectally useful to use this label in the keyword section 
as a no decomposition rule label since this will cause the 
program to look at another keyword when no decomposition 
rules fit the input (see TWO SCRIPT on page 44). 


*NOKEY 


This uses the NOKEY mechanism in the control script, 
which randomly selects one of twelve phrasings of "PLEASE 
REWORD YOUR STATEMENT" each time the system goes to the 
label NOKEY, If any list is taken off TABLE in the 
processing of the input, it is put back on TABLE. 


*QUIT 


This section causes the script playing to terminate 
from the control script and returns control to the CTSS 
wee level. This should be used instead of the function 


STOUTN 


STOUTIN is a list that controls the recording of the 
student part of the conversation (see page 58). STOUTN 
should be set equal to a list that includes the appropriate 
printing code words including NOTYPE (see page 55). STOUTN 
Is intially set equal to (NOTYPE) by the control script. 


TEM 


There is a list named TEM (for temporary) that _ts 
created by the control script. It may be used as 8 te 
ft is needed for temporary storage. Each time it is use 
or a different purpose it should be recreated by LIST(TEM). 


UABEL 


The variable LABEL is alwa 1 to the last label 
ys equa x 
POPTOPed off the the list DAHIN. It is sometimes useful 


ey Something has gone wrong and the scriptwriter wants to 
W where the system is. 


— ———=————— 
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A. Definition of Terms 


There are two areas where scripts or other files may be 
located. When a script is written (by using edl), it js 
stored as a file in the disk storage of the computer. When 
a script is being played, a copy is taken from the disk and 
put in the memory of the computer. The ELIZA system has 
control when a script is being used in memory. 
refers to a transfer of a file copy from the disk to memory, 
Writing refers to a transfer from memory to a disk file, 
Printing refers to a transfer from memory to the console 
typewriter. Output refers to the characters transferred in 
either writing or printing. 


B. Reading and Writing 


In order to either read or write a file, the file must 
be opened. Only one file may be open at any one time for 
either reading or writing. Therefore, to read or write 
another file, the open file must be closed. The OPL 
functions that deal with reading, writing, and printing are 
described in the Appendix on page A22. The following 
section describes printing and writing in detail. 


C. Printing and Writing 


The two functions that control printing by the computer 
are TYPE and TXTPRT. Either one can also control writing 
onto disk files, for example recording all or part of 4 
dialogue between student and computer. TYPE can also cause 
Spaces, tabs, and carriage returns to be included in the 


output. For a complete description of its capabilities, se 
Page A22, 


Both TYPE and TXTPRT require instructions as to where 
and how to carry out the printing and writing. Printing can 
be done on the student console (with or without the 
Parentheses that surround lists) and/or on a_ storage disk 
(in which case a name must be given for the file in which 
the recording is to be stored). 
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D. Output Format--The Code Words 


The instructions to the computer are provided by an 

list, which contains certain code words. The 

order of the code words on the list is not important, except 

for NNORD and DISK where the code consists of more than one 

word. The code words provide different options for printing 

and writing, and all of them do not have to be included on 
the instruction list. The code words are described below. 


NWORD number 


This code controls the maximum number of characters 
printed per line. NWORD must be followed immediately by an 
integer that is the number of words of 6 characters to be 
printed per line. For example, NWORD 8 sets the maximum 
line length at 48 characters per line. If this code word is 
not included, the system sets the number of words to be 14, 
or a maximum line length of 84 characters. 


NOCR 


When this code word is included, there will be no 
carriage return at the end of a line. It should only be 
used with printing that will not exceed one line. 


NOTYPE 


Printing will not occur on the console typewriter, but 
writing will still occur on the disk if specified. 


CONCAT 


The parentheses surrounding the list and the first 
level of sublist parentheses on a list are omitted in the 
output. For example, concatenated sentences are usually 
constructed by NEWBOTing the pieces onto a list, and use of 
this code word will cause printing and writing without extra 
(nena appearing in the output. The list 
FRAN 2 CIS) CAN EXAMPLE)) will be printed as THIS IS AN 


LPRINT 


Description lists are included in the output if they 


exist. Also, a set of parentheses is put around the output. 


TAGS 


raMyted this code word is used, tag lists (e-R- (/FEMALE 


)) are also included in the output. 
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DISK namel name2 


This code word causes the output to be written onto 3 
disk file as well as printed on the console. The two words 
immediately following DISK specify the name of the file, a; 
indicated by “namel name2". For example, the words isk 
SPACE TIME will result in the writing of a file named "spact 
TIME", If name2 is the word OUT, it will be changed to the 
user's programmer number. For example, DISK X OUT wil) 
result in the writing of a file named "X 9740" if the user's 
programmer number is 9740. This allows many users of the 
same script to operate at the same time. If the file 
already exists on the disk, the mew output will be 
automatically appended to the file. DISK does not close the 
file. 


CLOSE 


Use of this code word closes the output file after the 
present output (see also the OPL function DSKCLS, page A24). 


PROGPR 


Use of this code word causes the output to be put Into 
program format. This means that a carriage return and a tab 
will be inserted after each period, comma, and colon. 
Asterisks are interpreted as indicating labels, and will be 
Preceded by a carriage return and followed by a tab. 
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—. Using TYPE and TXTPRT 


In the TYPE function, the instruction list is not 
entered explicitly as part of the function. When the TYPE 
comand is used, the system looks for the instruction list 
naned STOUT (a contraction of "student output"). If no list 
naned STOUT exists, the computer assumes that the command is 


ig! (zero), which means “on the typewriter". The TYPE 
function will print the outer pair of parentheses of a list 
unless the code word CONCAT is included on STOUT. (The 


TXTPRT function does not, see below.) Therefore it is wise 
to define STOUT to include the code word CONCAT as a 
minimum, The control script makes this definition. STOUT 
can, of course, be redefined in any script before or during 
the conversation. 


In the TXTPRT function, the instruction list is 
indicated explicitly. The command 


TXTPRT(L1,L2) 


will result in the printing of the list Ll according to the 
code words contained in the list L2. Both lists may be 
written out in the function. The command 


TXTPRT('(HELLO, MY FRIEND),0) 
will result in the printout 
HELLO, MY FRIEND 


on the student typewriter. The instruction "9" (zero) in 
place of the list L2 is the simplest explicit instruction 
and means Yon the typewriter". The TXTPRT function does not 
Print the outer pair of parentheses that surround the list 


If this conversation were being recorded on the disk as 


ee as being printed on the typewriter, the command might 
a 


TXTPRT(' (HELLO, MY FRIEND), STOUT) 


where earlier in the program the list STOUT is defined, for 
‘nstance, as 


STOUT="(CONCAT CLOSE DISK XX YY) 
is brief the command says "print the list (HELLO, MY ee 
n the typewriter without the outer and first level S07 oo. 
Parentheses (CONCAT) and also append it to the AF YN 

SK) whose first nane is XX and whose second name 1S : 
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By using a single list such as STOUT In all TXTPRT 
commands, the entire conversation will be printed according 
to the code words on the list STOUT. lf the scriptwriter 
wants to start or stop recording the conversation, only the 
code words on the list STOUT have to be changed. This would 
also affect all the TYPE commands. 


F. Recording Conversations 


In order to record conversations on disk files, both 
sides of the dialogue must be recorded. Both STOUT and 
another list STOUTN must be set to include the appropriate 


code words. For example: 


STOUT="(CONCAT CLOSE DISK TRAIN OUT), 
STOUTN='"(NOTYPE CONCAT CLOSE DISK TRAIN OUT), 


The computer side of the dialogue can then be recorded by 
using TYPE(L) or TXTPRT(L,STOUT), where L Is_ the list 
containing the output. The student side of the dialogue Is 
recorded automatically according to the code words on the 
list STOUTN. Thus, both sides of the dialogue will be 
recorded on a disk file named TRAIN progn, where "progn" 
will be the user's programmer number. 
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Chapter 8 -- WHEN THINGS GO WRONG 


The scriptwriter must usually do two things when a 
script Is not working properly. First, the source of the 
error must be located, not always an easy task. Second, the 
error must be corrected, which is sometimes easy, like a 
missing parenthesis, and sometimes difficult and may involve 
a lot of reprogramming. This section is concerned with ways 
of locating and correcting errors, and avoiding some of the 
more common ones. 


A. Frequent Errors 


Of all the possible errors that can be made in writing 
ascript, the following are the most frequent. When looking 
for a mistake, it will be helpful to check for these first. 


1, Omitting a parenthesis where it is needed. Keyword 
structures and certain functions such as TXTPRT are 
the most susceptible. 

2, Omitting the END) at the end of the program. 

3, Making Incomplete or incorrect erasures during the 
editing of a script. 


B. Tracing 


The OPL function TRACE is helpful in locating the 
Source of an error. TRACE has two modes. The normal mode 
's OFF, When the TRACE is turned ON by including TRACE(ON) 
asacommand, the system will print the functions and 
arguments it executes. Much of the output may seem like 
gibberish, especially at first, but it should provide good 
Clues as to what is going wrong. Understanding will come 
only through use. The TRACE may be turned OFF by including 
TRACE(OFF) as a command. The TRACE may also be turned ON 
and OFF by using $ as the first word of an input followed by 
he TRACE command (see page 10). 


— 
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C. Testing 


| It is sometimes helpful to test small sections of an 
OPL program to see how they are functioning. In order to 
avoid writing a whole script, there is a script that will 
test these sections called EVAL SCRIPT (stored in m5347 


cmf101 on Comp Center). 


EVAL SCRIPT 
(PROG CEVAL 
GOTO( POPTOP(DAHIN)). 
*START TXTPRT('( PLEASE BEGIN),0). 
*NOKEY EVAL( INPUT), TXTPRT('(R),0). 
END) 


EVAL SCRIPT executes the input as an OPL program and types R 
when it is finished. The small sections of program to be 
tested can be typed in as input for EVAL SCRIPT. They may 
also be tested by using $ as the first word of an_ input 
consisting of a small section of program (see page 10). 
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D. List of Rules 


Trouble will result if the following rules are 
disobeyed. 


1. 
2. 


fw 


5. 


18, 


ith 


Always close all opened parentheses. 
Do not use more than six characters in labels, 
keycodes, script names, and variables. These also 
must start with a letter. 
Make sure that the labels START and NOKEY are 
included in every script. 
Do not put a period (.) immediately following a 
number--separate by a space (write 2 . rather than 
2.). 
Do not use the following symbols in a program or in 
an input--they will not be understood: 

Gmvationes 2 Al <-> backspace 
Include labels in all appropriate places in a 
keyword structure, even if they will never be used. 
For example, at the end of a keyword structure: 

(0) () LABEL 

) NOKEY )) 
The NOKEY will never be used but must be included. 
Do not use anything outside of the keyword or 
Program sections of a script; even a blank space at 
the end of a script causes problems. 
Do not use the characters END) anywhere except to 
close off all parentheses. The command POPTOP(END), 
will cause problems. 
Follow all commands (except IF and FOR) with a comma 
or a period. 
Do not forget to close IF and FOR statements with a 
colon (:), and do not use the colon anywhere else in 
the program. 
Do not use // for anything except comments--remember 
to close each comment. 
Do not use more than five blank spaces together. If 
Spaces are to be printed, use the TYPE function. 
Do not read a script into the presently active group 
area. 
Do not have two labels in the same script that are 
the same. 
Do not use a precedence number higher than 262143. 
Do not use more than one eguele sign. CF), in). a 
command: X=Y=Z will not work. é 
fomnot suse obs, fot) “equals sane cae assignment 
statement, and do not use = for equals in a 
Boolean expression. 
Make oe all variables to be used are 
specified in either OWNLIST or COMMON. — . own 
Make sure a period follows the last variable in oa 
and OWNLIST statements. This is not true for COM 
statements. 


first 
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E. Special Names 


The following names are reserved for use by the systeq 
or the control script, and should be Used by the 
scriptwriter only in the ways described in this manual, 
Their proper usage is described on the indicated pages, 


INPUT 3 
DECOMP 4 
SEMBLY 5 
TABLE 22 
ELBAT 23 
O'E 23 
KEY 28 
EXP 28 
DAHIN 18 
SA 19 
KA 19 
GROUP 19 
SCRPN 19 
PROG 6 
START 7 
NOKEY 7 
STOUT 57 
STOUTN 58 
STORE 48 
LABEL 53 
PLACE 48 
TEM 53 
SCRNAM 48 
END) 6 


The following words should not be used by the scriptwriter 
as variable names, 


E'R 
ABORT 
RETURN 
REPEAT 
WHILE 
WHERE 
SAV 


In addition, it is dangerous to use function names 4S 
anything (such as labels or varlables) other than functions. 
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by Michael J. Knudsen 
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The SLIDES system was developed as a Special Problem in 
Electrical Engineering by Michael J. Knudsen at the M,1.T. 
Education Research Center, in conjunction with Professor 
Joseph Weizenbaum, Dr. Merton J. Kahne, DOr. Judah Schwartz, 


and Or. Walter D. Daniels. 
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A, Introduction 


The SLIDES system is Intended to enable ELIZA users to 
write scripts which use in the instruction not only their 
own printed words but also pictorial, diagrammatic, or 
graphical information presented on photographic slides. A 
slide projector 1s commanded by the script to show the 
student any of a large number of slides stored in_ the 
projector's "“carousel"-type magazine. Through an "X-Y" 
coordinate system similar to that used on road maps, the 
script can “point out" given objects or features of 
discussion on the slide by referring to that object's 
coordinates. Likewise the student may answer or ask 
questions of the script by typing coordinates of the point 
in question. Considering that most commercial teaching 
machines have some sort of built-in slide projection system, 
it is only natural that one of the most powerful teaching 
“machines,” ELIZA, should also be able to utilize pictorial 
information. 


To simplify matters for the scriptwriter, the scripts 
may be made independent of any particular set of slides, to 
the extent that a script may be written without knowing the 
actual coordinates of the significant features on the slides 
to be used with that script. In fact, the script may be 
written before the actual slides have been prepared. When 
writing the script, the author need only have in mind a 
fairly spectfic plan as to what objects, in what relations, 
the script will need to have available on slides. For 
example, in developing a tutorial on cell division, the 
writer might say "Il assume | can obtain slides showing a 
cell in the successive phases of mitosis, of sufficient 
quality to show clearly the parts of the cell referred to in 
my scripts..." After writing the script, he may then go 
about securing the needed microphotos. 


Once a particular set of slides has been made up for a 
script, some kind of "dictionary" must be supplied with this 
set, for translating names of objects referred to in the 
script Into thelr exact location-coordinates on slides, and 
vice-versa. The script may need to refer the student to 
some object by giving a slide and the object's coordinates 
on it, hut since the script was prepared separately from the 
slides, no coordinate information is built into the script; 
hence the need for the “dictionary” oF auxiliary memory !f 
Which the script can “look up" the slide and coordinates of 
the object, and then type these out for the student oF 
otherwise use them. Conversely, the script may ask the 
student to identify something by pointing jt out (typing In 
its coordinates); then the dictionary must be consulted to 
see whether the student's coordinates do point to the 
correct answer. 


——————————— 
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This chapter explains the use of the SLIDES System, 
which supplies the needed dictionary. There are two phases 
in working with a -slide dictionary--first, given the 
particular set of slides for use with the script, a disk 
file containing the dictionary list is created, this process 
being called "editing." Editing is handled by a special 
script provided. The other phase, called "retrieval," 
involves the use of this dictionary list by the teaching 
script (or set of scripts). Retrievals, or "lookups," are 
performed by function calls in the teaching script calling 
the retrieval functions which have been defined for this 
purpose in the OPL language. These functions are all 
contained in a library file called "SLIDES LIBE," which Is 
used exactly like "DEFINE LIBE"; see page A29. You may 
print out the SLIDES LIBE to study the operation of the 
functions. 


(At present, a script must type out the number of the 
next slide to be used, and the student must select this 
slide by manual control. Also, the script must type the 
coordinates of a point in order to “point out" something to 
the student, who in turn must type in coordinates when 
referring to some point on the slide. The selection of 
slides will someday be automated by direct control of the 
projector carousel from the data phone, and we expect to 
develop a mechanical pointer attachment for the viewing 
screen, which, controlled in a similar manner, will point 
out objects directly and can be manipulated by the student 
to transmit coordinates back to the computer system. Thus 
the student will be freed from thinking about coordinate 
numbers. Automatic slide projection would also make it 
feasible to present large blocks of textual material on 
Slides instead of typing them out.) 


While everything described in this chapter works as 
described, the SLIDES system should not. be regarded as a 
final, finished product. Like ELIZA, SLIDES ts an 
evolutionary system, whose continued improvement depends on 
the "feedback" from the users. New functions are constantly 
being developed. We are anxious to hear any comments 
regarding bugs, possible new functions, changes to existing 
functions, questions on the use of the system, and comments 
on this chapter, All questions and comments should be 


addressed to Michael Knudsen Edu 
cation Research Center, 
Room 20-C-120, MIT, Extension 5383, 
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B. Editing 


The coordinates of a point on the slide are determined 
by reference to the grid below, superimposed on the slide 
(this grid is presently engraved on the ground-glass screen 
in front of the student on which the slides are projected; 
it is also possible to have the grid physically printed on 
each slide.) 


To edit a slide, use the terminal equipped with the 
projection system, i.e., the terminal to be used by students 
playing your script with the slides. Load the set of slides 
to be edited into the projector in any desired order; from 
now on, the number of each slide is its numbered position on 
the remote selector dial of the projector. Start the ELIZA 
systen (if possible use "SYS", without the control script) 
and play the slide-editing script, EDITOR. Use manual 
control to select the slide to be edited. With the slide 
showing on the screen, for each object that you wish your 
Script to recognize as being on that slide, note which 
squares (points) of the grid that object covers and make a 
list of these. Usually an object will cover several 
squares, If a square lies on the boundary of an object 50 
that the object only partly fills the square, it 1s better 
> Include that square in the list because of the nature of 
gi of the retrieval functions, such as CENTER and OUTLIN. 
lis is your decision, however. 

For each object, type in its point-list for that slide 

Y this format: 


a — 
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name-of-object SLIDE number POINTS xl yl x2 y2 x3 y3... 


where "name-of-object"" can be a phrase of any length and 
number of words, “number" is the number of this slide, and 
the X-Y pairs are integer numbers from the coordinate grid, 
all these being the list of squares covered by the object. 
The words SLIDE and POINTS must be inserted as shown, though 
not in capitals; these serve as delimiters for the 
decomposition rule in the editing script. At least one 
entry operation must be made for each object used by the 
script on that slide, but remember that a list of X-Y pairs 
may be several lines long if it is single-spaced, since 
ELIZA does not read its Input until a double carriage return 
is given. A sample entry might be: 


inferior vena cava slide 4 points 37384 8 
2.8 5 96 9.759 JF 10'S o72 
(double carriage return) 


Additional entries may be made for the same name-of-object 
On the same slide; new point-pairs will be appended to those 
already entered. This enables adding points, even to a 
dictionary which had been previously FILEd and now FETCHed 
back for further editing (see Other Commands). If any of 
the new points being added are already there, these points 
will not be added a second time and you will be notified 


(see Error Messages). 
Deleting 


For various reasons, you may wish to remove some 
Squares from the lists for some objects. To do this, type: 


DELETE name-of-object SLIDE number POINTS x1 yl ... 
thers cverything is the same as for an entry, except that 
aes St of X-Y pairs contains only those points to be 
eleted from that name on that slide, 


To remove an obj I 
Ject entirely from a slide, without 
typing all its points on that Slide, use: : 


DELETE name-of-object SLIDE number 


To eli , 
Cynee minate a name from the entire set of slides, 


DELETE name-of-object 
Filing 


When finished editi 
t 
dictionary, to file the Ti ri 


e€ entire set of slides for that 
St permanently in your disk tracks 


PAGE 69 


ed name f the new file in 
i Y file by that 
e fed nto it; for 

a (This appending 
re several independent 

1 tt saving tracks; a 
nd and read in by a_ special 
De not try to combine two 


e dictionary this way!!) 


nary just edited to replace an 
r z you have FETCHed 
yn and/or corrections. In 


" will be Jeleted, the new 


the same name. 


FILE or REFILE, the Editor 
ARE YOt FINISHED WITH THIS 
the list will be cleared just 
and the script will say "LUST 
‘no" the reply "LIST READY TO 
you may continue to add to the 
bullding up a new dictionary in 
, often to protect your work so far 


a 
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Other Commands 


To aid in manipulating the dictionary lists, these 
other commands are recognized by the script: 


CLEAR 


Erases the dictionary list that was being edited, in 
Preparation for working on another. Typing CLEAR has the 
same effect as quitting and playing the Editor script over 
again. Several files can be created without the need for 
quitting. Don't forget to FILE the list just finished 
before CLEARing! 


FETCH namel name2 


: This command reads the dictionary list “namel name2" 
into the editing bay. (The “editing bay" is the list, 
called NAMES, in the editing script where the dictionary is 
built up.) Normally you would first give a CLEAR command 


unless you have just started the editor script. If the 
editing bay is not empty, the FETCHed list will be appended 
onto the one already in the bay. This can be used to 
combine two dictionaries, i they have no names of 


objects in common (otherwise the retrieval functions cannot | 
find anything under the second occurrence of any duplicated | 
names). If the requested file is not found, the familiar 

GOOF ON READING FILE" will be printed. If all goes well, 
Editor will type "LIST READY To EstT.™ 


LIST 


By itself, this will print (ust i 
a ng TXTPRT) the entire 
contents of the editing bay, i.e., the present form of the 


Saget in straight linear form, Good for overall 
Hadeecr se eee the structure of a dictionary list. 
wane 2 : e dictionary is already rather long and you 

nly to check entries under a particular 


name-of-obj ect, use: 
LIST name-of-object 


Thi . ; 

eile ues sets the entries under the given name, one slide 

Sts sare nothing has been entered under the name (or 
spelled it), a message is Printed. 


QUIT 


Thr 
his request returns you from the ELIZA system to CTSS 


command level, t i 7 csr 
SEL IWOE Ce GU the editing. Remember to FILE 
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Error Messages 


The Editor script is provided with checks to protect 
itself and the user against errors, Error responses may 
result from mistakes either in entries and deletions, or In 
using the additional commands just described. Messages 
involving entry and delete operations are: 


"PLEASE TRY AGAIN." 
Your request did not fit any recognizable format. 
"POINTS NOT IN PAIRS. NO ACTION TAKEN." 


Your list of X-Y points to be entered or deleted had an 
odd number of numbers. You probably omitted an xX, Y, or 
Space between two numbers. Because this error "scrambles" 
the points, the script checks for this before acting on _the 
Points--hence you must repeat the entire entry or deletion. 
An even number of such errors in one command cannot be 
detected, 


"ALL POINTS ENTERED, EXCEPT THESE DUPLICATES~-- 
+.-(list of points)... " 


This indicates that the points listed after =1e mess BERS 
Were already in the dictionary or appeared twice in gb s 
entry, All other points in your entry will have Aba 
entered as usual, so no harm is done. powexenr Y A 
apparent duplication may be due to a typographical error, 
check your work. 


"ALL POINTS DELETED, EXCEPT THESE NOT FOUND-- 
++-Clist of points)... " 


Your list of points to be deleted petit pergpeaigesas 
not in the dictionary under the given nae gona! have been 
given slide. All other points in your sy 
deleted as usual, but again, check your - 


"NO name ON SLIDE number " 


slide on 
You tried to delete a name genital) toe spelling. 
which it was not listed as appearing. 


"NAME NOT FOUND--name " 


‘ 
y which wasn't 
You tried to delete a name completely v 


there--spelling? 


——————=o< + °~ i*' 
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C. Retrieval by Scripts 


The functions to be described permit a script to make 
use of the name-coordinates information stored in dictionary 
lists. Before discussing the functions themselves, some 
preliminaries must be explained. 


internal Dictionary Lists 

For use by a script, a dictionary list must be read 
from the disk file into a list in the ELIZA system. The 
list which receives the dictionary may be any list which has 
been created in the usual way. The retrieval functions wil! 
then operate on this list. 


Rending in bictt 


The desired dictionary is read into the desired list by 
using the OPL "DSKLST" function (see page A23). A 
recommended format, in two lines, Is: 


DSKLST(Namel,Name2,Dict), 
DSKCLS(0,0,0), 
(rest of program) 


qpere, Nemet Name2" is the name of the dictionary file, and 
r a is the name of the list into which the dictionary |s 
ead. The zeros in DSKCLS are required dummy arguments. 


all une dictionary list should be declared COMMON so that 
e€ scripts in your set can refer to it. 


If several diction ted 
ary files have been concatenate, 
each successive call to OSKLST without calling DSKCLS in 


b 

the ieee tee read the next list after the last one. After 

will take 'st has been read from the file, however, DSKLST 
on the function value "DONE. Therefore you caf 


Sin ve 
to the contents of the “Dict” lict in your script 
ot DSKCLS, wher Dict) between repetions of DSKLST (bu! 
is read in. Noga Must be done after the final desired 
file Is automarreattat if the "DONE condition occurs, 
atically closed. “To read tA the third list: 


——<————_— —™ 
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FOR Cel STEP 1 UNTIL C .G. 3 .OR. X .E. "DONE DO 
LIST(Dict), X=DSKLST(Namel, Name2, Dict) 
DSKCLS(0,0,0), 
(rest of program) 


There is no restriction on the number of separate 
dictionary lists that can be present at one time (each 
dictionary in a separate list, of course), so one script may 
refer to several dictionaries, since the retrieval functions 
are "told" which list to refer to. Unfortunately, the 
present memory space limitations do not encourage multiple 
dictionaries. 


Loading the Functions 


The retrieval functions must be defined, or loaded into 
the system so as to be known to the ELIZA evaluator. The 
functions are loaded from the SLIDES LIBE disk file by: 


EVAL(LOAD('SLIDES, '( fnl fn2 fn3....-)))- 


where "fnl fn2 fn3 ..." need contain only those functions 
used in your script set, or required by those you use. Many 
of the SLIDES functions depend on others, a5 shown below: | 


Function 1 Requires these functions | 
a VALIST 

stp FIXIT 

NAMPTS Satter | 
uANSED VALIST, FIXIT / 
ee FIXIT | 
a VALIST, FIXIT 

fae VALIST, FIXIT ; 
ee VALIST | 
wars NAMSLD, VALIST, FIXIT 

HAXSLO FIXIT 
ree HAMSLD, VALIST, FIXIT 

'SITIN none 

VALIST none 

LOA none 

FUN none 

tal OUTLIN, VALIST, FIXIT 


OUTLIMN, VALIST, FIXIT 


a 
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The Retrieval Functions 

Conventions 

The functions are listed below with their call~argument 
formats. These functions all have certain call arguments in 
common. DICT is the name of the Jist Into which the 
dictionary in which you want to "look up" the data has been 
read. OUT is the name of whatever list you want the output 
of the function to be loaded into. The output, if any, Is 
NEWBOTed onto the present contents, if any, of OUT. DICT 
and OUT, in that order, are always the last two call 
arguments of the functions, except for the "MAXNAM! 
function, which does not use OUT, and ISITIN, a Boolean 
(true or false) function that takes any two lists as 
arguments. Of course, the names DICT and OUT are merely 


mnemonic--use any names you like. Other dummy varlables 
shown as call arguments are: 

Variable Mode Meaning 

NAME List name Name of an object on a slide 


(must be a list containing 
the name and nothing else.) 


SLIDE Numeric-- Number of a slide 
(Floating-point 


or integer) 


x Numeric Horizontal coordinate of a point 


M Numeric Vertical coordinate of a point 


Function Descriptions 


In the following descriptions, a typical question that 
of the dictionary is given. Also Is 
Not he functions output in the OUT ist. 

c that whenever NAME, SLIDE, X, or ¥ appear, In an 
argument list, they are always input (given) data; output 
results appear in the OUT list and/or as the function's 


value. The normal return value of most of the functions 15 
Just the name of the list ouT, 


When any retrieval function can find nothing In the 
ee fo satisfy its input conditions and must er 
the panied Be 't returns the literal word "NONE instead 4 
Whenever » she list OUT, to which nothing has been ~ ave 
input orul, 8° @ retrieval function tnvolvesnestl ‘a 

Case, ann iPt should always check the results for the 


null 
NULL eee by "IF SLOCSLIDE,DICT,OUT) .£, "NONE THEN GOTO 


Sr 
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, DICT, OUT) frv: OUT or 'NONE 
"List all the slides that show a NAME. 


JUT=(SLIDE] SLIDE2 SLIDES ...) 


NAMPTS(NAME, DICT, OUT) frv: OUT or ‘NONE 


"List all the slides, together with the points on that 
slide, which show a NAME," 


UT=(SLIDE1 (X11 Y11 X12 Y12 ) SLIDE2 (X21 Y21 X22 Y22..)..) 


Note that OUT becomes a list of pairs, with slide numbers as 
attributes and as values those points on that slide that 


Show a NAME, 


SLIDE, DICT, OUT) frv: OUT or ‘NONE 


“What names appear on this SLIDE?" 


T=(NAME] NAME2 NAME3 ... ) 


The “inverse” function of NAM. Note that each NAME in OUT 
itself a list, so OUT Is a list of lists. 
HAMSLD( NAME, SLIDE, DICT, OUT) frv: OUT or "NONE 
“hat points on this SLIDE show this NAME?" 
UT=(X1 Y1 X2 Y2 X3 Y3 ..-) 
' ' ; 7 be treated as such 
T is a list of data pairs which should " NAM 
by your sertot This function is the "intersection of 
nd SLO 
frv: OUT or "NONE 


,X,Y¥, DICT, OUT) 
: ou 
at the point X Y on this SLIDE? 


‘What object NAMEs are 
T=(NAME] NAME WAGES occ, 4 


than one NAME appears In 


my e 
If mor the given point. 


sverlap at 


ne output format as . 
1 


hen al these objects 


| 
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MAXNAM( NAME, DICT) frv: SLIDE or ‘NONE 


"Which slide has the largest (or most) NAME?" 


OUT is not used. 


The first of four "maximum" functions, MAXNAM returns the 
slide having the largest number of points listed under NAME, 
Note that the function itself takes on the return value, 


MAXPTS(NAME, DICT, OUT) frv: SLIDE or "NONE 


“Which slide has the largest or most NAME, and on what 
points?" 

OUT=(X1-Y¥1 X2.Y¥2 X35 43° Soe 

This one does MAXNAM, plus it returns the “winning” set of 
points. Note the slide number is the function Value, as 
with MAXNAM, but OUT is also used, with same format as for 


NAMSLD. If the NAME appears on no slides, MAXPTS takes on 
the value "NONE and OUT is empty. 


MAXSLD( SLIDE, DICT, OUT) frv: OUT or ‘NONE 
"What object covers the most points on this SLIDE?” 
OUT=NAME 


The inverse of MAXNAM, but unlike it, MAXSLD must use OT 
because the single name is a list. 


MSLPTS(SLIDE, DICT, OUT) frv: OUT or ‘NONE 

"Do MAXSLD and list the "winning" NAMEs points.” 
OUT=(NAME X1 Y1 X2 Y2 X3 Y3 ...) 

The inverse of MAXPTS. Note the mixed contents Of ouT-"2 


MUSE on top of a list of data pairs. You can POPTOP ee 
me-list off to get at the point pairs. 


CENTER(NAME, SLIDE, DICT, OUT) frv: OUT or ‘NONE 


"What point 


is the center of the NAME on this SLIDE?” 


OUT=(X y) 


; pe 
uene arithmetic mean of all points on ie sis 
ME to find the centroid of this object 


CENTER takes 
under this 
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may be useful when it is necessary to use a single point to 
point out a large object to the student. Scriptwriters 
should beware of crescent-shaped and other odd objects whose 
centroid may be outside the object--see the next function. 


QUTLIN(NAME, SLIDE, DICT,OUT) frv: OUT or "NONE 
"Outline the NAME on this SLIDE." 
OUT=(XT YT XR YR XB YB XL YL) 


T, R, 8, and L stand for top, right, bottom, and left. 
OUTLIN finds the farthest-out points in all four directions, 
and lists them in clockwise order, starting from 12:00. 
Even on a Slide filled with irregular, overlapping large 
objects, CENTER and OUTLI!! together can nail down one item 
fairly reliably. These two functions are expected to be 
useful with automatic pointer mechanisms also. 


If CENTER or OUTLIN is used on a name that refers to more 
than one separate object on the given slide, the results 
require special Interpretation. OUTLIN would return the 
topmost point of the highest such object on the slide, but 
the lowest point of the lowest such object, etc. In a 
cluster of several small objects of the same name, OUTLIN 
will find the extreme members of the group and thus delimit 
the cluster; CENTER will point to the density-welghted 
center of the cluster, which might not be any individua 
object, 


ISITINGL1,L2) frv: B 


1 i 228 
"Does the list L1 match contents with any list on L 


- e) or 0 
This is a Boolean function, taking the values 1 (tru 


A i but is 
(false). It does not refer to the dictionary 


: 4 : 2 (such as SLD oF 
provided for checking a list of names 1 in Ll. However it 


ATPT would return) for the specific name 
is used, every element of L2 


must be a list. 
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Utility Functions: These are used by most of the retrieval 


functions, but are included here for your use if needed, 


VALIST(L1,L2) frv: Dor "NONE 


"Find the value of the attribute-list Ll on the  pairs-list 
E257 


This function is identical to the OPL "VAL" function, except 
that the attribute whose value is sought is a list, not a 
datum. Normally the attributes are the object-names in the 
dictionary. 


FLOAT(N) frv: F 


A utility function that converts an integer to its 
floating-point equivalent. 


FIXIT(N or F) frv: N 


A utility function which accepts a number of either integer 
or floating-point mode, and returns an integer (the OPL 
"INTGER" function accepts only floating-point numbers). The 
retrieval functions use this to be able to accept SLDNO, X, 
and Y in either "numeric" mode. 


utu u 


In the near future we expect to develop high-level 


functions which test for certain spatial relations between 
objects on a slide, i.e., whether A is above, below, left 
of, inside, or outside B. The student might ask to talk 
about the cell on Slide 16, but there are two cells on this 


Slide, so the Script asks him which one. The student could 
then answer "The one on the left." 


The Editor Script and the 
also be modified to allow ob 
various descriptions, 


retrieval functions might 

ject-names to be "tagged" with 

modifiers, or subscripts, using the 

SPeH ER These tags could keep several objects 

e same name on the Same _ slide logically separate; 

we te. Meg on different names could mark Ease 

ng to the same c] . writer cou 

tag a Particular ce]] on sine” side “ka Wen the best 

+ SO if the student said "Show 
e selected. 


me a cell," 
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Experimental Functions 


Two spatial-relation functions of the type mentioned 
under "Future Functions" are available in tentative form: 


VERT(NAME1, WAME2, SLDNO, DICT) frv: F or 'NONE 
"What is the vertical relation of NAME1 to NAME2?" 


If either name cannot be found, VERT returns ‘NONE. 
Otherwise, ignoring the horizontal relation of NAME1 and 
NAME2, VERT returns the floating-point integer F with 
values: 2.0 if all points of NAME1 are above all points of 
NAME2 ("completely above"); 1.0 if some points of NAME] are 
above all points of NAME2 and no points of NAME1 are _ below 
any of NAME2 ("above but overlapping"); -2.0 if NAME1 Is 
completely below NAME2; -1.0 if NAMEl is below but overlaps 
NAME2; 0 if none of the above. Note that exchanging NAME1 
and NAME2 for a given pair of objects just reverses the sign 
of the result. 


HOR(NAME1, NAME2, SLDNO, DICT) frv: F or "NONE 
“What is the horizontal relation of NAME1 to NAME2?" 


HOR is identical to VERT except that X-coordinates are 
checked. Substitute "to the right of" and "to the left of 
for "above" and "below" in the description of VERT. 


' % P ta 
If either NAME] or NAME2 in the above functions refers 
more than one separate object on the slide, the frv's beve 
special meanings--see the notes under OUTLIN, page . 
(Both HOR and VERT work through OUTLIN.) 


While the author welcomes comments on any BsPce ee af mie 
SLIDES system, comments on the experimental yo ae of 
especially important in developing =e ae VERT and 
spatial-relations functions. Is the resolution o 2 Might 
HOR (number of cases recognized, now 5) mae es bi Please 
you want to compare objects on two different 5° ice Education 
address all suggestions to iiichael Knudsen, 

Research Center, Room 20-C-120, MIT. 
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=Li Structu 


A dictionary list is a list structure three levels 
deep--the main list, its sublists, and sublists of those 
sublists. The top list, the name list, consists entirely of 
sublists, arranged in attribute-value pairs. Each attribute 
is the name of some object, and its value is a second-level 
Slide list. A slide list is also an attribute-value set 
Here the attributes are slide numbers (each a datum), whose 
values are the third-level point lists. Point lists contain 
Pairs of X and Y coordinate numbers (all data, no more 
sublists). 


To find a picture of some object, we would first find 
its name in the name list. In its value, the slide list 
immediately following it, we would have a set of slides to 
choose from. After each slide number, the point list for 
that number would tell which points on that slide were 
covered by the object. Note that, in the entire structure, 
each object name will appear only once, but a slide number 
will appear once on the slide list of every object-name 
listed as appearing on that slide, 


As list structures go, this one is relatively simple 
An understanding of it should enable anyone familiar with 
the basic OPL functions to understand the workings of the 
editor script and the retrieval functions. 


A diagram of the dictionary list structure ts given on 
the next page. 


Demonstration Script for Retrieval Functions 
You may try out the retrieval functions by playing the 
test _Script, SLIDES (uses SLIDES LIBE), which accepts 
questions for each function (similar to the "questions" 
given in the function descriptions) and prints out the 
results for whatever dictionary file you have "FETCHed." 
ants script may also be of value in checking large 
ctionary files. The appropriate question formats can be 
seen by Printing this script and looking at the key 
structure. Note that there are several Printout routines in 


this script for the various f, i i 
orm vi i 
functions deliver their output, ieee Ree nar ered 
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D of Dicti 


The name list is marked with a 1, slide lists by 2, 
point lists by 3. These numerals are not stored in 
structure at all, but are just labels for this diagram. 


1{ ( Ist object name ) __ ( 2nd object name SE eed 
/ / 
/ / 
/ / 
/ / 
/ / 
/ a er 
/ / 
/ / 
/ / 
/ 2 ( SLIDE22 __ SLIDE22 __ «.. ) 
/ / / 
/ / / 
/ / / 
/ f % CG X221 V220 iaen? 
/ 


/ 
3 ( X211 ¥211 X212 ¥2i2" sear) 


eis see Sok ae oa 


2 ( SLIDE11 SLIDE12 SLIDE13 Acie) 


3 © X1351, YIST << ) 


3 ¢( x121 121 X122 Y122 «+. ) 


3-¢ X121 ¥aTl x112 Y¥112 X113 ¥1I1S ose 2 


and 
the 
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General Characteristics of Functions 


A function is an instruction or command that tells. the 
computer to do something. Before listing and describing the 
OPL functions and some of the operations that can be 
constructed from them, it will be useful to describe the 
general characteristics of a function when used in a script. 
A function in a script has two general properties: CI it 
causes some type of operation on or some change in certain 
objects to occur--these objects are called the variables and 
are Included within a set of parentheses following the 
function; (2) it associates an object with the operation or 
change and the variables of the function--this object is 
called the yalue of the function or the function return 
value, and it may be one of the variables. For example, the 
function TOP(L) (page A5) has one variable, the name of a 
list (indicated by L). Its function return value is the 
datum stored in the top cell of that list. Since the 
variables and the function return values fall into certain 
classes, these will be Indicated by the following letter 
notation: 


-- the name of a list. 

-- a datum; this can be a word, an integer, or a 
floating point number. 

-- a machine address, indicating the location of 
cell. 

a sequence reader. 

-- a floating point number. 


-- an integer. 
-- a Boolean number; either 1 (true) or 0 (false). 


-- an identifier, whose value fits one of the above 
classes. 


a 


<oz7>2> > OF 
1 
1 


be 
In the descriptions of the functions, these lect ae eaten 
used to Indicate the class of the vaniables ay own names for 
return value. The scriptwriter Are) Eee names like D, 
these objects when writing scripts, and no 
Ll, and L2. 
ful 
The second property of a function ener aoe a 
for using the function to do somes ie ene ie WametoGemitie 
variable of another function. In thts h * second function. 
first function replaces a variable of Sts cunetrons ikiStcs) 
An example should make this clear. its properties 


(page A3) is a function of one vardap lene os DE ee 
are: (1) it creates a new list Lz (2) 


value. The 
the list, which is L, as its function return 


tion of two 
function NEWTOP(D or L1, L2) (page A3) 3 See ets 
variables, one of which is either D or : 


i L1 whichever 
This function puts the datum Dor the list £ 


——E———<—- —=— =} 
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category the variable fits, on the top of the list L2. To 
show how a function return value can be used as a variable, 


examine the statement: 


NEWTOP( ‘WORD, LIST(STACK)) 


Since all operations are performed from the inside of the 
Parentheses working out, the function LIST is performed 
first, creating the list named STACK, disposing of any old 
list named STACK, and putting the function return value, 
which is STACK, in place of LIST(STACK) in the expression, 
STACK is now empty and the statement looks to the computer 
like: 


NEWTOP( "WORD, STACK) 
The function NEWTOP is performed next, which places the 
datum WORD on top of the list named STACK, NEWTOP itself 
has a function return value, but it is not important for 
this example. STACK finally looks like: (WORD) , 


In identifying the functions in this appendix, the 
following format will be used: 


FUNCTION(V1,V2,...,Vn) frv: VALUE 
weta the "Vs" are the varlables and "“frv" stands for 
auction return value", Ina script, the function return 
value may be identified by using an assignment statement: 
X=FUNCTION(V1,V2,..., Vn) 


The value of the identifi 
tion 
return value of FUNCTION. X will then be the func 


Appendix PAGE AG 


LIST FUNCTIONS 


This section contains those functions that are 
primarily concerned with operations on and information 
retrieval from lists. 


LIST(L) frvs..b 


This function initializes a list by creating an empty 
list whose name is L, which is also the function return 
value. If L already exists, it becomes an empty list. 


MTLIST(L) fry: L 


This function empties the list L, i.e., its cells are 
returned to available space. The value of the function is 
the name of the now empty list. This function does not 
empty or remove any description lists which are attached to 
the list L. 


LEMPTY(L) frv: 8B 


This function returns the Boolean value 1 if the list L 
is empty; otherwise, this function returns the Boolean value 
0. The list L is not changed. 


COUNT(L) frv: oN 


This function returns the number N of elements or cells 
in the list L. The list L is not changed. 


LISTOF(Y1,¥2,...,Yn) fry: L 


Yn and puts them 
This function takes the data Y1,Y2,..., 
in that order as the elements of a list whose name L is rhe 


function return value. Each Y can be either a datum or 
name of a list. 


NEWTOP(D or Li, L2) frv: A 


he, list, iba in 
"places" the datum D or t { 

the ta nahn oF eke list L2. The value of the function is 
A, the machine address of the added datum. 


NEWBOT(D or L1, L2) Five oo y 
: h list Ll in 
This function "places" the datum Dor the ist. oe 


i The value of 
the bottom cell of the list L2. ; 
is A, the machine address of the added datun 


OO 
SS 
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INLSTR(L1, A or L2) frvs ».t% 


This function "inserts" the list Ll on the top of the 
list L2 or to the right of the machine address A. The list 
Ll is emptied by this function, and the name Ll is returned 


as the function value. 
INLSTL(L1, A or L2) frv: Ll 


This function "inserts" the list Ll on the bottom of 
the list L2 or to the left of the machine address A, The 
list Ll is emptied by this function, and the name Ll is 
returned as the function value. 


Note: There is a difference between "placing" a list L1 in 
some location in a list L2 and "inserting" a list L1 in some 
location in a list L2, as can be seen by comparing the 
functions NEWTOP and INLSTR. When a list is "placed" in a 
location, only the name of the list is placed there, and the 
list becomes a sublist (see Page 31). When a list ts 
inserted" in a location, the contents of the list are 
actually placed in that location, so that the result is a 
Single list, 


: The pair of functions LINLST and STRLST involve the 
difference between a linearized list and a _ sublisted 
Structured list. A list may contain references to other 
lists (i.e, sublists) when such sublists are "placed" on the 
Original list, as the NEWTOP function does. As mentioned 
before, only the name of the sublist (with an indicator to 
snow that it is the name of a sublist) is put on the list. 
egies list has had the contents of all sublists 
Tees Th between parentheses (as literal characters) on the 
shal e difference between these two states of a list 
cannot be detected by the TXTPRT function, since this causes 


Marbut: However, the differen h 
ce can be detected by the 
MATCH function (page A14), Since the two states of a list 


frv: 12 


This function takes d 
the list Li makes a_ linearize 
CODY Of Tt)" and "inserts" it on the bottom of the list L2. 


frv:. £2 


This function takes the list Ll, makes a structured 
rts" it on the bottom of the list L2 
anged by this function, 


EES ’''' “=r 
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LSLCPY(L1,L2) frv: L2 


This function makes a copy of the list Ll and "inserts" 
it on the bottom of the list L2. If Ll has sublists, only 
the name of the sublist is copied. The list Ll fs not 
changed by this function. 


LSSCPY(L1,L2) f¥vie® 1:2 


This function makes a copy of the list Ll and "inserts" 
it on the bottom of the list L2. If L1 has sublists, all of 
its sublists and their sublists are copied with their new 
names replacing the old names in the copy. The list Ll is 
not changed by this function. Since this function copies 
both lists and sublists, which is very time and space 
consuming, LSLCPY should be used to copy lists instead of 
LSSCPY except in very special cases. 


NULSTR(L1,A,L2) fry: £2 


This function causes the list Ll to be split into two 
Separate lists at A, the machine address of a cell on the 
list Ll. A new list L2 is created that contains all the 
cells to the right of and including the cell located at A. 
The name of the new list L2 is the function return value. 


The list L1 now contains all the cells to the left of and 
excluding the cell located at A. 
NULSTL(L1,A,L2) frvie.s v2 

This function causes the list Ll to be split into two 


i the 
Separate lists at A, the machine address of a cell He sake 


list L. A new list L2 is created that contains 


left i the cell located at A. 
tho near’ p aise function return value. 


The name of the new list L2 is the 
The list L1 now contains all the cells to the right of and 
the cell located at A. 


TOP(L) frv: OD 
This function has as its value the he prone 48 
the top (leftmost) cell of the list L. e 
changed. 
BOT(L) frv: D 
d n 
This function has as ick hae hie ot: (ea ta be 
the bottom (rightmost) cell o e 3 
not changed. 
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NTHTOP(L,N) frv: D 


This function has as its value the datum D stored in 
the Nth cell of the list L counted from the top of the list 
down. The list L is not changed. 


NTHBOT(L,N) frv: D 


This function has as its value the datum D stored in 
the Nth cell of the list L counted from the bottom of the 
list up. The list L is not changed. 


POPTOP(L) frv: D 


This function returns as its value the datum D_ stored 
in the top cell of the list L and removes this cell from the 
list, i.e., the top cell is returned to available space and 
the second cell becomes the top cell. 


POPBOT(L) frv: D 


P This function returns as its value the datum D stored 
in the bottom cell of the list L and removes this cell from 
the list, i.e., the bottom cell is returned to available 
space and the next-to-the-last cell becomes the bottom cell. 


MADOBJ(D,L) frv: Aor 0 


' This function searches the list L for the datum D. The 
unction return value is the machine address A of the first 
occurrence of D. If D fs not on L, the function return 


Value is 0 (zero). Th is 
function, e list L is not changed by th 


SUBST(L or D1, A) frv: D2 
This function replaces th Bi 
e datum D2 stored in the ce 
ee at machine address A by either the list mame L or 
atum Dl. The datum p2 is returned as the function 


Value, {Ff the first ar 7 " " 
ed 
in the cell located at es mas 's Ly the list L )isepiac 


SUBSTP(L1 or Dl, L2) frv: D2 


This function re 
Places the datum D2 stored in the top 
hea by either the list name Ll or the datum Dl. The 
argument 7 pee Function return value. if the first 
S Ll, Ll ts "placed" in the top cell of L2. 
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SUBSBT(L1 or D1, L2) frv: D2 


This function replaces the datum D2 stored in the 
bottom cell of L2 by either the list name L1 or the datum 
D1. The datum D2 is returned as the function value. If the 
first argument is Ll, the list Ll is "placed" in the bottom 
cell of the list 12. 


REMOVE(A) fry: D 


This function removes the cell located at the machine 
address A, The function return value is the datum D that 
was stored in the cell. 


REPLAC(L1,L2,13) frvert2 


The lists L2 and L3 contain strings of characters. 
This function replaces every occurrence of the string in L2 
that occurs in the list L1 hy the string in L3. The value 
of the function is the name of the list Ll. 


EXISTS(Y) frvzs"B 


This function returns the Boolean value 1 if the 
identifier Y has been designated as a variable of ae 
Program (usually done by an assignment statement (e.g. a=1 
Or an OWN statement, see pase 20). Otherwise, the function 
returns the Boolean value 0. 


ATOM(Y) frv: 6B 


lue 0 if the 
This function returns the Boolean va 

identifier Y is the name of a list; otherwise, the function 
returns the Boolean value 1. 


FSTATE(D1,D2) frv: B 


This function returns the Boolean value SS ae ae 
file on this disk whose first name is Paes See ae Poi 
whose second name is indicated by D2. aprpectamt ilente s 
exists, the function return value is the [e} 


The file is not changed. 


a 
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Note: The following four functions provide for different 
types of comparisons between lists. In the first three, 
ALL, ANY, and NONE, the list L2 is linearized (see Page As) 
before comparing. This means that words within parentheses 
are included for the comparisons. The list Ll should not 
contain any parentheses. 


ALL(L1,L2) frv: Dor "TRUE 


This function searches the list L2 to determine if all 
the words on the list Ll are included. If this is the case, 
the function return value is the word TRUE. If all are not 
included, the function return value is the first word D on 
L1 not found on L2. The lists are not changed. 


ANY(L1,L2) frv: Dor ‘FALSE 


This function searches the list L2 to determine if any 
of the words on the list Ll are included. If this is the 
case, the function return value is the first word D on L1 
found on L2. If no L1 words are found on L2, the function 
return value is the word FALSE. The lists are not changed, 


NONE(L1,L2) frv: Dor "TRUE 


This function searches the list L2 to determine if none 
of the words on the list Ll are included. If this is the 
case, the function return value is the word TRUE, If any 
words are found, the function return value is the first word 
D on Ll found on L2. The lists are not changed. 


LSTDIF(L1,L2) frv: 0 or -1 


This function compares the two lists L1 and L2 to see 
Taare me fot they are identical. If the lists are 
etc th * including all sublists and sublists of sublists, 
Ihste ceo. eeetlon return walue, ts; (zero). Otherwise, the 

gare different, and the function return value is -1 


BE EEEEEESSE'"“"= rrr 
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DESCRIPTION LIST FUNCTIONS 


A description list is a list that is associated (by a 
link in the header) with another list. In most of the 
functions that deal with description lists, it is assumed 
that the description list is made up of pairs of data, the 
first datum of the pair being called the attribute and the 
second being called the value. 


MAKEDL(L1,L2) frv: L2 


This function makes the list Ll a description list of 
the list L2--i.e., it associates Ll with L2 through a_ link. 
The function return value is the name of the list L2. The 
contents of the lists Ll and L2 are not changed. 


NODLST(L1) frv: 12 or 0 


This function removes the description list of the list 
Ll--i.e., the links between the lists are removed, The 
contents of the lists are not affected by this function. 
The function return value is the name of the description 
list L2. If L has no description list, the function return 
value is 0 (zero). 


LSTNAM(L1) frv: L2 or 0 


This function determines if the list Ll has a 
description list. If it does, the name of the grec RElcD 
list L2 is the value of the function, If L1 does Be Poe 
description list, the value of the function is 2 
Neither Ll nor L2 is changed by this function. 


ITSVAL(D1,L) frv: D2 or 0 


the 


i e the value D2 of 
Bibs OneEL On. Se cura .2 LF ee associated with the 


attrib D1 in the description A 
list tif that attribute jis on che raha aes 
Otherwise, the function return value is 2 . 
list is changed. 
VAL(D1,L) frv: D2 or "NONE 
, 
D2 of the 
This function returns as its value Or ves ae is not 
attribute Dl in the list L. If the hes word NOME. The 
present, the function return value eee ceenehiOn does not 
list L is not chanred. ‘lote that ae does) but still 
refer to a description list (as es ’ 
assumes that L is a list of pairs © i. 
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NEWVAL(D1,D2,L) frv: D3 or 0 


This function returns as its value the value D3 of the 
attribute Dl in the description list associated with the 
list L. The datum D2 replaces the datum D3 as the value of 
the attribute Dl. If Dl is not on the description list, it 
is put there with D2, and if there is no description list, 
one is created. In these cases, the function return value 
is 0 (zero). The list L is not changed. 


NOATVL(D1,L) frv: D2 or 0 


This function deletes the attribute Dl and its value D2 
from the description list of the List) us The function 
return value is D2. If Dl is not found, or if there is no 
description list, the function return value is 0 (zero). 
The list L is not changed. 


DE 'SD'”~C“ ol 
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SEQUENCE READER FUNCTIONS 


The following functions are concerned with the sequence | 
reader. They enable the scriptwriter to examine single | 
cells on a list. The sequence reader is essentially a 
pointer that points to a specific cell. It can be moved 
right (down) or left (up) on the list one cell at a_ time. 
Every list has a special cell called the header, which 
contains the machine address of the top and bottom cells of 
the list. When a sequence reader is moved up past the top 
cell or down past the bottom cell, it points at the header. 
Thus, a list can be considered to be circular, with the 
header cell linking the top and hottom cells. 


SEQRDR(L) frv: R 


This function initializes a sequence reader of the list 
lL. The function return value is the name of the sequence 
reader R, which initially points at the header of the list 
lL. The list L is not changed. 


SEQLR(R) frv: Door ‘NIL 


This function moves the sequence reader R one cell to 

the right (down) in the list of which it is a reader. The 

| function return value is the datum D in the cell to which R 

now points. If R was initially pointing at the header, it 

now points to the top cell. If R was initially pointing at 

the bottom cell of the list, it now points to the header, 

and the function return value is the word NIL. The list L 
is not changed. 


Example: One of the most important uses of the sequence 
reader mechanism is in locating a specific datum ina list. 
This can be done by the following OPL program, This preaean 
| checks the list LST for the word KITTEN, If it is ue he 
list, the system goes to the label FOUND. If it ie note 
the list, the system goes to the label NOTFND. co ’ 


all the identifiers are mnemonic. 


RDR = SEQRDR(LST) 
T DATUM = SEQLRCROR ‘ 
, tf DATUM we. "KITTEN THEN GOTO FOUND : ai. 

IF DATUM .E. ‘NIL THEN GOTO NOTFND ELSE GOTO T : 


SEQLL(R) frv: Dor ‘NIL 

This function moves eal fees rears iis Ack hg oe 

left e list of wi ; . te . 

uncles reece vanes is the datum D in the cell Fe vinlcn a8 
ing at the header, 


now points. If R was ini ehe ty pone He if OR was 
now points at the bottom cel eatn on the list, it now 


initially pointing at the top 
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points at the header, and the function return value is the 
word NIL. The list L is not changed. 


SEQPTR(R) Preven HA 
This function returns as its value the machine address 
A of the cell to which the sequence reader R points. The 


reader R is not moved. The list L is not changed, 


S In a few functions, such as REMOVE and SUBST, a 


machine address A is a variable of the function. The 
function SEQPTR is very useful in connection with these 
functions since its value is a machine address A, The 


sequence reader mechanism and its associated functions can 
be used to locate a certain datum in a list and the function 


SEQPTR used to obtain the machine address of the cell that 
contains the datum. Then the functions mentioned above may 
be used with the obtained machine address, If, in the 


example above, it was desired to substitute the word CAT for 
the word KITTEN, this could be done by the following OPL 
Program under the label FOUND, 


*FOUND ADR = SEQPTR(RDR), 
SUBST('CAT, ADR), 


This program section was written only as a demonstration of 
the use of the sequence reader. The commands 


ADR = MADOBJ('KITTEN, LST), 
IF ADR .E. 0 

THEN GOTO NOTFND 

ELSE SUBST('CAT,ADR) : 


makes the same Substitution in a Simpler and faster way. 
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KEYWORD AND SENTENCE ANALYSIS FUNCTIONS 


The following functions allow the programmer to work 
directly with keyword structures, decomposition and 
reassembly rules, and other operations that are part of the 
ELIZA and CTSS system. 


A keyword contains the precedence number, the 
keycode, the decomposition rules, the reassembly rules, and 
the labels that are associated with a keyword, 


In the process of analyzing an input, the keyword 
Structures of the keywords In the input are "placed" in a 
list in the order of their occurrence in the input, This 
list is called a keystack. When ELIZA has generated a 
keystack in the normal input analysis, its name is KA(N), 
where N is the group number, 


ADDKEY(SA(N), L) fyrviet it 


This function adds a keyword to the script located in 
group area SA(N), where N is the group number. The list L 
must contain a keyword or a substitution in the proper 
format (see pares 11 and 13). The added keyword does not 
become a perinmanent part of the script, but is temporary each 
time the script is called and the function executed. The 
list L is not changed. 


KEY(L1, SA(N), L2) frv: L3 or 0 


This function finds the keywords in an input string. 
The computer scans the list L1 for the keywords of ae 
Script located in group area SA(N), where N is ehe foe ie 
number. The keys found are stacked in the tla is 
the order of their occurrence. The name of the Pienese 
which contains the keyword structure with ie DES 
Precedence number of the keys found in the Boers, eet 
as the value of the function. If no key is found, 


is the function return value. 


¢ 0 
WASKEY(D,L1) frv: L2 or 
D 
This function checks the keystack Lata phe ey cose, 
ud os ag Hil ee de it aa eee ceuneee Ti). Ate 
keyword and the first decomposition rule GS ons 
the keycode is found, the keyword structure 


xeysta a e name of the IIs which con n e 
the keystack d th f th Pez hich contains th 
x c nd t name ’ 


keyword structure of the removed key, en D HCCE EERO MMERE 
function, If the keycode is not found, 
function return value. 
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HIRANK(L1,N1,N2) frv: L2 or 0 
This function searches the keystack Ll according to 
Precedence number (see page 11). There are three different 
types of search available depending upon the value of N2, 
a) N2 = -1 
The first keyword with a precedence number greater 
than or equal to Nl is removed, and the name of the 
list L2, which contains the corresponding keyword 
structure, is the value of the function. 
b) N2=0 
The first keyword with a Precedence number greater 
than or equal to Nl is located. The stack is split 
at this point with all following keys remaining on 
the stack. The one found and all previous keys are 
removed. The name of the list L2, which contains the 
peyword structure of the keyword found, is the value 
of the function, 
Cy) INQ Ss gy 
The first keyword with a Precedence number greater 
than or equal to N1 is located. The name of the list 
L2, which contains the keyword structure of the 
KEYNOTE Sone is the value of the function, Nothing 
S removed, 
In all cases, 0 (zero) is the function return value if no 
keyword meeting the specifications is found. Also, Nl = 0 
'S a special case, This is interpreted as the largest 
seh Precedence number and causes a@ search of the entire 
ress ay + Thus, the name of the list containing the keyword 
f ucture of the highest ranking keyword is the value of the 
unction in this case, 


MATCH(L1,L2,L3) frv: L3 or 0 


This function applies the decomposition rule contained 
io, the eee Ll to the list L2. The resulting decomposition 
reece nserted" on the bottom of the list L3. The 
pabee ea return value is the name of the list L3, unless 
value of tre stche In which case 0 (zero) Is returned as the 

€ of the function, Neither Ll nor L2 is changed. 


ASSMBL(L1,L2,L3) frv: L3 


hart ees function applies the reassembly rule contained in 

renee ae the decomposition fst. 2, The resulting 

Sea st is "inserted" on the bottom of the list L3. 

tare the 11st. U3 Isc returned as the value of the 
Bs: ) Nel ther. 1 ‘nor L2 is changed. 
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INDICATOR FUNCTIONS 


When words or data are Stored in the cells of a Uist, 
there are a few indicators in the cell structure that 
describe the contents of the cell. One indicator, called 
the alpha-numeric indicator, indicates whether the datum in 
the cell is alphabetic or numeric, This indicator is 0 
(zero) if the datum is numeric, 1 (one) If the datum is 
alphabetic, and 3 if the datum is alphabetic and part of a 
longer word (see next Paragraph). 


MRKIND(O or 1 or 3, A) 


This function sets the value of the alpha-numeric 
indicator of the cell located at the machine address A_ to 
either 0 or 1 or 3. 


INDCTR(R) frvz. 0 or Lior 3 


This function returns the value, which is either 0 or 1 
or 3, of the alpha-numeric indicator of the cell to which 
the sequence reader R is pointing. If the value is 0 or 1, 
they are Boolean values. The indicator is not changed. 


Another separate indicator, called the word-length 
indicator, indicates whether or not the datum is part of the 
datum in the cell following it in a list. Words, in the 
gramnatical sense, are stored in the computer in six letter 
chunks, Each chunk is a fe ce oay is stored re BUT ARs 
cell (see page 31). If a cell has a negati 
indicator les datum has been marked as part of the datum in 
the cell that follows it. If a cell has a_ positive arene 
its datum has been marked as separate from the datum in at e 
cell that follows it, which means that it is the end ° a 
grammatical word. For example, when the word weekday ae 
Stored in the computer, it is stored as: -weekda +y : ieee 
+day . (The + and - signs indi 2 t : 
word=length indicator, and are not actually poner he 
cell as data.) If a word is less than six let oe nee a 
indicated in the list by a blank space, a comma, the. whole 
or any other character not alphabetic or pune eee ‘euges 
word is stored and the rest of the six spaces - 
blanks (which are not printed out). 


MRKPOS(A) frv: A 


indi f the 

This function marks the word-length piarmeee thee. sign. 

cell located at the machine address A ee datunt is to. be 

This is the same as stating that i = be and! Sepanate 
considered as the end of a grammatical word, 


q re. 
from the datum in the cell that follows i 
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MRKNEG(A) frv:, A 


This function marks the word-length indicator of the 
cell located at the machine address A with a negative sign. 
This is the same as stating that its datum is to be 
considered as part of the datum in the cell that follows it. 


Note: The sign of the word length indicator of a cell is 
the same as the sign of a sequence reader that points at 
that cell. The following program section uses this fact: 


SR=SEQRDR(L23), 


NUM=0, //WORD COUNTER// 
*LA DA=SEQLR(SR), 
TE.DA, -E. ONL //END OF LIST// 
THEN TYPE('THERE ARE ' NUM, "WORDS. '),: 
IF SR .G. 0 //SIGN OF SEQUENCE READER// 
THEN NUM=NUM+1 : //END OF ANOTHER WORD// 
GOTO LA . 


This program section counts the number of granmatical words 
(which includes periods and commas) in the list L23. 


A third separate indicator, called the list-mark 
Indicator, is used only when the content of the cell is the 
name of a list. The indicator is either 0 (zero) or 1 
(one). It indicates nothing about the list, but can be used 
by the Programmer as an indicator of whatever he chooses. 
That is, the list-mark indicator reflects no information 
about the internal structure of the list, except as the 
Programmer sets and interprets the value of the indicator. 


MRKLST(O or 1, L) 
This function sets the value of the list-mark indicator 
of the list L to either 0 or 1, 


LSTMRK(L) frv: Oorl 


“4 This function returns the value of the list-mark 
indicator of the list L. The 


indicator is not changed. 
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MATHEMATICAL FUNCTIONS 


The function return values of the following OPL functions 
are the identifiers tu the left of the equals sign, 


F2 = SIN(F1) F2 equals the sine of Fl 

F2 = COS(F1) F2 equals the cosine of Fl 

F2 = TAN(F1) F2 equals the tangent of Fl 

F2 = COT(F1) F2 equals the cotangent of Fl 

F2 = ARCSIN(F1) F2 equals the inverse sine of Fl 

F2 = ARCCOS(F1) F2 equals the inverse cosine of Fl 

F2 = ARCTAN(F1) F2 equals the inverse tangent of Fl 

F2 = TANH(F1) F2 equals the hyperbolic tangent of Fl 

F2 = SQRT(F1) F2 equals the square root of Fl 

F2 = SQUARE(F1) F2 equals the square of Fl 

F2 = CUBE(F1) F2 equals the cube of Fl 

F2 = LOG(F1) F2 equals the natural logarithm of Fl 

F2 = EXP(F1) F2 equals the number e raised to the 
power of Fl 

F2 = ABS(F1) F2 equals the absolute value of Fl 

F2 = MODULO(F1,N) F2 equals the modulus of Fl to the 
base N 

F = MAX(F1,F2) F equals the larger of the pair Fl F2 

F = MINCF1,F2) F equals the smaller of the pair Fl F2 

N = INTGER(F) N equals the integer part of F, 
returned as an integer 

Fs uimenrcesy Fz eauals She Floating polne nunber 

Fs awooncoy Tis, fupetton, Fatarvar (O20 

F = RANSET(F) This function sets F as pte ae 


point of the random number 
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and is used in order that different 
sequences of random numbers can be 
generated with the function RANDOM 


The following operators may also be used. 


+ add 

- subtract 
* multiply 
/ divide 


raise to the power of 


—— 
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BOOLEAN FUNCTIONS 


Certain functions make use of Boolean variables and 
Boolean algebra. A Boolean variable has one of two values: 
1 (true) or 0 (false). The following Boolean Operators may 
be used in Boolean expressions. 


oE. 
~LE. 
GE. 
NE, 
ol. 
-G. 
«AND, 
-OR, 


equal to 

less than or equal to 
greater than or equal to 
not equal to 

less than 

greater than 

and 

or 


A space should precede and follow the completed expression 


in order 


to avoid confusing the periods with numbers 


preceding or following the expression. For example, write 


(X SE. 1), 


The 


operations. 


B3 = AND(B1,B2) 


This function returns the value B3 of the logical 
Operation and on the Boolean values B1 and B2. B3 = 1 if 
and only if Bl = 1 and B2 = 1; otherwise, B3 = 0. 


83 = OR(B1,B2) 


This 


Operation or on the Boolean values Bl and 82. 
only if Bl = 0 and B2 = 0; otherwise, B3 = 1. 


B2 = NOT(B1) 


This 


Operation not on the Boolean value 81 
If Bl = 1, 


mot (X.E.1). 


following three OPL functions perform Boolean 


i h lue B3 of the logical 
function returns the va Ree re aca 


the value B82 of the logical 


function returns if81 10, B20) sie 


B2 = 0. 
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IF 


The IF statement has the following format- 
IF Boolean THEN program ELSE program : 


The expression immediately following the IF must be either 
true or false (Boolean 1 or 0). If it is true, the program 
immediately following the THEN is executed; if it is false, 
the program immediately following the ELSE is executed. The 
IF statement must be terminated by a colon (:). After the 
appropriate program is executed, the system goes to the line 
following the IF statement, unless. the Program executed 
caused the system to go to another part of the script. The 
following IF statement is an example of an algebraic sign 
determination. 


1F X .L. 0 THEN X= -1*X ELSE GOTO A : 


If X is less than zero, the sign of X is changed, and the 
system goes to the next statement after the colon. If X is 
not less than zero, the system goes to the label A. tf > it 
is desired only to transfer control to the next line when 
the IF statement is false, the “ELSE program" may be 
omitted, as: 


IF X .L. 0 THEN X= -1*Xx 


IF statements may be used within the program of an IF 
statement, providing they are Properly terminated by colons. 


FOR 


The FOR statement has the following format- 
FOR program STEP Program UNTIL Boolean DO program : 


The FOR statement is basically designed to exectue a certain 
Program a certain number of times, depending upon a test and 
upon acertain variable that is incremented after each 
execution. The program following FOR usually initializes a 
varlable, such as ! = 1, and Is executed only once. The 
ually contains an integer that is 
re SmeUne that the variable is to be incremented each time. 
EEC eae following UNTIL must be a Boolean, which is 
ie Seer time the variable is increased. If the Boolean 
ipetheecn S_System goes to the statement after the colon. 

e oolean jis false, the program following DO is 


executed. The order of executi eBh 
Statement is as follows: peta Ree abit has 


— EES 
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FOR program 

UNTIL Boolean (true or false?) 
DO program 

STEP program 

UNTIL Boolean (true or false?) 
DO program 

STEP prorram 

UNTIL Boolean (true or false?) 
DO program 

STEP program 
etc., until the Boolean is true. 


The following FOR statement is an example that computes the 
factorial of a positive integer N, and returns the result as 
the value of F, 


FOR 1=1, F=1 STEP 1 UNTIL | .G. N DO F=I*F : 


If Nwas equal to 3, the statement would work in the 
following manner. First, I and F are set equal to l. | is 
identified as the variable to be incremented since its 
assignment statement comes first. Next, | .G. N is checked 
and since 1 .G. 3 is false, F is set equal to 1*1 which is 
1. Next, | is increased by 1, which makes its value 2. The 
whole process is now repeated. Since 2 .G. 3 Is false, F is 
set equal to 2*1 which is 2. 1 is increased by 1 to 3. 
Again, since 3 .G. 3 is false, F is set equal to 3*2 which 
is 6. | is increased by 1 to 4. This time 4 .G. 3 is true, 
and the system goes to the next statement. The value of F 
is 6, which Is 3 factorial. 


If it is desired to have a program following STEP and 
still Increment the variable, this may be done by putting 
the increment as a single number as the first statement of 
the program. For example, the factorial statement could 


have been written as: 
FOR t=1, F=1 STEP 1, F=l*F UNTIL f ES ane 


within the program of a part of a 


1) « 2 used 4 
FOR statements may be u terminated by 


FORK statement, providing they are properly 
colons. 
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READING, WRITING, AND PRINTING FUNCTIONS 


The following functions deal with reading, writing, and 
printing. For a more detailed description of some aspects 
of these functions, see Chapter 7, "Reading, Writing, and 
Printing", which begins on page 54. 


TYPE(Y1,Y2,...,Yn) 


The TYPE function can be used for many purposes. It 
can be used for both printing and writing, since the output 
is controlled by the code words on the list STOUT (see pages 
55 and 57). It can also be used to modify the format of the 
output by including spaces, tabs, and carriage returns. The 
number of arguments Y1,Y2,...,Yn is indefinite but not 
infinite. Each Y can be one of the following identifiers, 
which will cause the indicated output. 


Argument Qutput 

L the contents of the list L 

"SPACE(N) ' N spaces 

‘TAB(N) ' N tabs 

"LINECN) ¢ N carriage returns 

"comment ' the characters between the apostrophes ('), 
in this case: comment 

D D the value of the datum D 

comment ' D comment the value of the datum D 

(function) the value of the function (if a list) 


function the value of the function 
(if a datum) 


The space before the last apostrophe is necessary in the 
arguments that have apostrophes. 


The following section of an OPL program with its output 


demonstrate the use of the various arguments of the TYPE 
function. 


The program section: 


STOUT="(CONCAT), 
L1="(THE FUNCTION TYPE PRINTS LISTS,) 
L2="(ALSO SPACES), tf 
L3="(TABS), 
AND CARRIAGE RETURNS) 
L5="((FUNCTIONS.)), z 
D=1, 
TYPE(L1, "AND COMMENTS '), 
TYPECL2, "SPACE(4) ", L3, "TABC2) ", Lu, "LINE(2) "De 


TYPEC'AND DATA ' p, "LINE(1) ', dD), 


TYPE("AND THE VALUE OF ' (TOP(LS5))), 


, 
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The output: 


THE FUNCTION TYPE PRINTS LISTS, AND COMMENTS 

ALSO SPACES TABS AND CARRIAGE RETURNS 
AND DATA 1.0 
) 1.0 

AND THE VALUE OF FUNCTIONS. 


TXTPRT(L1, L2 or 0) Frvs. ibd 


This function causes the computer to print the contents 
of the list Ll as a linear text string according to the code 
words on the list L2 (see Page 55), 1f the second argument 
is 0 (zero), the list Ll is simply printed on the teletype. 


PRTLC(D1,02,D3) 
This function prints the disk file whose name is 


specified by the data D3 D2 from the archive file whose name 
is specified by the data Dl D2 (see section AH.4.01 of the 


CTSS Programmer's Guide). The files must be created and 
edited using TYPSET instead of FDL (see section AH.9.01 of 
the CTSS Programmer's Guide). This function is useful for 


printing large amounts of material, with both upper and 
lower case characters (see page 34). 


PRTUC(D1,02,03) 


This function prints the disk file whose name is 
specified by the data D3 D2 from the archive file whose name 
is specified hy the data Dl D2 (see section AH.4.01 of the 
cTss "s Guide). The files must be created and 
edited by using EDL, which means that all letters will be 
capitals, and that certain characters cannot be used. 


OSKLST(D1,02,L) frv: Lor ‘DONE or 'GOOF 

This function reads lists from the disk file whose name 
is specified by the data D1 D2. The file must _ consist of 
one or more lists (indicated by eae le ane ms ee un | 
EDL format. Each main list must star e 
Script Is a good example of such a file, ee eee Ga 
and the program section are main lists. The Ae TREATIES 
OSKLST opens the file and reads the first Poe et — 
L, which is also the function return WE aes Chen 
DSKLST returns the second list in the file, an i iid es 
DSKLST is used after the last pent rea aati iat 
DONE is returned as the value of the funct aned cage iano 
is closed. The disk file is not changed hy BS peae sarees 
its lists. If the file cannot be found, eles Bee GOOrE 
printed, and the function return value is > 


list has 
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DSKCLS(0,0,0) frv: "DONE or ‘GOOF 


This function closes a file that is open for either 
reading or writing. It has the same effect as the code word 
CLOSE (see page 56). The function return value is the word 
DONE. If there is no open file, an error message is 
printed, and the function return value is the word GOOF, 
The arguments of the function are zeroes and must appear. 


: The following program section checks the disk file 
named ALPHA BETA for a list whose top element iis the word 
CHILD. When it is found, the list is put in the list C, and 
the file is closed with DSKCLS. If it is not found, the 


system goes to the label F. 


*E D=DSKLST('ALPHA, 'BETA, LIST(C)), 
IF D .E&. "DONE THEN GOTO F : 
IF TOP(C) .NE. ‘CHILD THEN GOTO E : 
DSKCLS(0,0,0), 


ARCHRD(D1,D2,L) frv: Lor ‘DONE or ‘GOOF 


This function reads from an archive file on the disk 
(see section AH.4.01 of the CTSS Programmer's Guide). The 
first name of the archive file is specified by Dl and the 
second name must be ARCHIV. It looks for the component file 
whose first name is specified by D2. If it finds the file, 
it reads it in the same manner as DSKLST. That is, it opens 
the file and reads the first list into the list L on its 
first use, it reads the second list on its second use, and 
so on. The function return value is the name of the list L. 
When ARCHRD is used after the last list has been read, the 
word DONE is returned as the value of the function and the 
file is closed. The disk file is not changed by the reading 
of its lists. If either the archive file or the component 
file cannot be found, an error message is printed, and _ the 
function return value is the word GOOF, 


SCRIPT(N, D1 or L) frv: Dlor L or ‘GOOF 


This function reads the script whose name is. specified 
by Dl from the disk into group area SA(N), where N is the 
group number. If the second argument is a list of the form 
(D2 D3), the disk file named D2 D3 is read in. If the file 
is not found, an error message is printed and the function 
return value is the word GOOF. See page 19 for a full 
description of changing scripts, 


DELSCR(N) 


This function deletes the Script stored in group area 


SA(N), where N is the gr : 
ne ript 
in the group ar group number. DO NOT delete a sc 


ea that is presently active. 


i Cid 


OO OO 
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LOAD(D,L1,L2) frv: L2 or ‘GOOF 

This function reads a number of lists from the disk 
file whose first name is indicated by the datum D and whose 
Second name is LIEBE (for library). The list Ll should 
contain the first word of all the lists that should be read 
in. The lists are "placed" on the list L2, the function 


return value. This function can he used, for example, to 
read a number of defined functions from the disk file DEFINE 
LIBE (see page A29). To be made defined functions of the 
script, the list L2 must be evaluated. After the functions 
are evaluated, the contents of the list L2 are not needed, 
so L2 should be recreated. For example, to load RANGE and 
KKK, write: 


EVAL(LOAD('DEFINE, "(RANGE KKK), LIST(TEM))), 
LIST(TEM), 


If any of the words on the list Ll cannot be found as_ the 
first word of the lists in the LIBE, a message to that 
effect is printed, and the function return value is the word 


GOOF, 
READ(Y) five “¥ 

This function causes the computer to print Af = "en 
the typewriter without a carriage return, and waits for an 
input until a double carriage return is typed. The 


identifier Y is given the value of the input. This function 
can be used to read numbers or an OPL program. 


RDLONL(L) frvs°.l 
This function causes the computer to read input enem 
the teletype into the list L. The computer will wait unt 


a double carriage return is typed before continuing with the 


program, 
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OTHER FUNCTIONS 


GOTO Y 


This function causes the system to go to the label Y, 
which must be marked by *Y in the script. If Y is a_ list, 
indicated by parentheses, the list is executed as an OPL 
program section and the system will go to the label that is 
the result. For example: GOTO(POPTOP(DAHIN)). 


QuIT(O) 


This function causes the computer to leave the ELIZA 
system and return to the CTSS command level. 


XECOM(L) fevs <t 


This function causes the computer to execute the CTSS 
commands contained in the list L. The name of the list L is 
the function return value. The list L is not changed. 


EVAL(Y1) frv: Y2 


This function evaluates the identifier Yl in the same 
manner that the program is evaluated (or exectued). The 
function return value is the last result Y2. 


TIMECO) frvs) -F 


This function returns the time of day in seconds as a 
floating point number F. The time is computed to tenths of 
seconds, and is based on a 24 hour clock. For example, at 6 
minutes and 18.2 seconds past 5 o'clock in the afternoon, F 
would be 61578.2 , 


TODAY(L) fren 


This function "inserts" the date and the time of day on 
the bottom of the list L. The date contains the month and 
the day, and the time is computed to tenths of minutes on a 
24 hour clock. For example, at 45 minutes and 24 seconds 
Past 8 o'clock on the evening of November 4, the function 
would cause the list L to be (11/4, 2045.4). 
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DEFINE 


In using the OPL functions in a script, it is sometimes 
mecessary to use the same set of OPL functions for a 
particular purpose a number of tines in the program. Rather 
than having to write out this set of functions each time it 
is desired to use them, the ELIZA system has the feature of 
allowing the programmer to define or construct a_ function 
that will perform the set of functions when called. This is 
similar to a subroutine in some other computer languages. 


This defined function is similar in structure to the 
OPL functions previously discussed (see the section of this 
manual on the "General Characteristics of Functions", page 
Al). A defined function has a specified set of variables, 
performs prescribed operations on them, and has a_ function 
return value. However, a defined function is different from 
the OPL functions in the following respects: the operations 
it performs are determined by a set of OPL functions; the 
function is defined only after the DEFINE statement is 
executed, but then is defined until the user quits the ELIZA 
System; and, most importantly, the function is defined by 
the writer of the script. 


The format for defining a function is as_ follows 
(notation: V -- variable ; FRV -- function return value): 


DEFINE(NAME(V1,V2,...,Vn)= 
OPL function, 
OPL function, 


(this is the OPL 
program that the 
function performs) 


OPL function, 
FRV ) 


NAME is the name which the programmer gives the function, 
which must consist of six letters or less. There can be ay 
number of variables, but there cannot be an indefinite oes 
infinite) number--all the variables must be specified ie fhe 
DEFINE statement. All labels are local to the set Oe es 
functions in the DEFINE statement. If ET merece 
hacia Diy to. she define (oper Cote next Tunctlendios Ifthe 
i age or i . 
Puy Ta battens the value of the last OPL function executed 


is the function return value. 
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The DEFINE statement is usually included in the section 
under the label START in the script. When the function is 
used in the script, it is used in the very same manner that 
an OPL function is used, as the following usage format 


indicates: 
NAME(V1,V2,...Vn) 


Whenever this is specified in the script, the sequence or 
set of OPL functions under the DEFINE statement will be 


performed. 


A simple defined function can illustrate this process. 
In conversation with a student, it may be desirable to 
rotate among a certain number of essentially identical 
responses whenever the student makes a certain statement. 
The following function will do this: 


DEFINE(ANSDIF(LST)= 
OWN(X), 
X = POPTOP(LST), 
TYPE(X), 
NEWBOT(X,LST), 
LST), 


The function ANSDIF takes the top element off the list 
specified, prints this element, puts it on the bottom of the 
list, and returns the name of the list as the value of the 
function. Thus, the next time ANSDIF is used on this list, 
a new top element (originally the second element) will be 
printed, and so on. When ANSDIF is used, it may be used on 
any list that has been set up in the script. In the above 
function, LST is only a mnemonic identifier, and when the 
function is used on a list, the name of that list is used in 
the place of LST. 


: A number of useful defined functions are stored on the 
disk in the file DEFINE LIBE. For a description of their 
use see page A293. 


LET 


The LET statement operates in exactly the same manner 
as the DEFINE statement, except that the function defined is 
defined only for the particular script that contains the LET 
statement. In addition, a LET statement can be used to give 
values to certain variables, which will be known only to the 
Particular script. For example: 


LET (X=1) (Y=2), 
If a LET statement is used within a DEFINE or a LET 


statement, the variables or the function that are LET will 
be known only within that statement. 


—— EEE 
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SOME DEFINED FUNCTICNS=-THE DEFINE LIBE 


, Since a numher of defined functions are useful to many 
Scriptwriters, there is a library of these functions stared 
on the disk in a file named DEFINE LIBE (on M5347 emf101 at 
Comp Center). Defined functions are described on page A27, 
and the loading of defined functions from the LIBE is 
described on page A25. 


The format of the functions in DEFINE LIBE is: 
( NAMECVL,V2,...,Vp)= 

Program of the function 

DLIST(description of what the function does) ) 


Each function is a list, indicated by the outer Parentheses, 
with a description list that contains information about the 
function, 


If the scriptwriter has a defined function that he 
thinks might be useful to others, he should check the DEFINE 
LIBE to make sure that there is no function that already 
does what his does, and that there is no function that has 
the same name as his function. Then his function, in the 
Proper format, may be added hy EDLing the DEFINE LIBE. 


The DEFINE LIBE included the following functions at the 
time this manual was published. 


(RANGE(L,U)= INTPRT(L+(U+1-L) *RANDOI(C)) , 
DLIST(THIS FUNCTION RETURNS A FLOATING POINT 


INTEGER RANDOMLY DISTRIBUTED OVER THE RANGE 
FROM L TO U) ) 


(KKK (ABC) = 
HIRANK(ABC,6,-1), 
LET(Z=0), 
Z=HIRANK(ABC, 0,-1), 
NENTOP(ELBAT, TABLE), 
IF Z .NE. 0 

HEN KEY=Z, EXP=INPUT. 

BEE kevettx co & 0) NOKEY)), EXPeIO. 
DLIST(THIS FUNCTION SEARCHES THE KEYSTACK 
3 FO: THE NEXT “41CHEST RANKING KEYWORD) 3 
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FLOW CHART OF THE SYSTEM 


The following flow chart shows the inner workings of 
the ELIZA system as of January, 1968. An understanding of 
the details of operation should help in detecting and 
avoiding mistakes in programming, but it is not necessary 
for writing scripts. 


Key to Symbols 


we direction of operation 
operations performed by the computer 


decision point for the computer 


printout by the computer 


Operations continued at label o& 


fife eit input from the console by the operator 
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find 
keyword 
PROG 


set up 
control 
script in 
area SA(0) 


remove and 
Store code 
name of 
script 


put START 
on top of 
DAHIN 


load functions 
TTT KKK RANGE 
from DEFINE LIBE 


set; 
GROUP=1 

STOUT='(CONCAT) 

STOUTN="(NOTYPE) 


execute the 
program of 
the presently 
active script 


is 
KEY equal 
zero? 


to 


nane of 
Script 


read script 
into area 
SA(1) 


is 

bottom of 

list name of 
present 

script 
? 


replace list 
on DAHIN by 
top of list 


EE’ ro 
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input 
INPUT 


put 
into 


TXTPRT( INPUT, STOUTN) 


of INPUT 


a $ 
? 


execute 
input 


is 
top 
of INPUT 
a $ 

? 


take $ 
off top 
of INPUT 


look at 
first word 
of INPUT 
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look at 
next word 


are 

there more 

words to 

Jook at 
iy 


put key 
Structure 
in keystack 
KA(GROUP) 


is 

there a 

precedence 

number 
? 


set precedence 
number to zero 


make 
Substitution 


look at B 


look at 
next word 
of INPUT 


PAGE A34 Appendix 


keywords 
found 
? 


put NOKEY on 
top of DAHIN 


take top list 
off TABLE-- 
call it ELBAT 


look at key 
structure with 

highest precedence 

number--put in KEY 


is ita 

substitution 

of the form 

(A=B((C))) 
? 


| 
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is 


there 

a list take top 
following the label off 

tag on the list 


ELBAT 
2? 


substitute 
this label 
for the list 


is 

there 

another list 

on ELBAT that 

contains this 

label 
? 


remove this 
label from 
the list 


put label of 
this tag on 
top of DAHI! 
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look at key 
structure 
in KEY 


look at first 
decomposition 
rule (DR) 


‘does 

DR match 

INPUT 
2 


put decomposed 
structure 
in DECOMP 


perform 
reassembly 
rule--put 
in SEMBLY, 


off TABL 
call it ELBAT 


on ELBAT and 

Precedence number 

less than 

10000 
? 
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take top list 
off TABLE-- 
call it ELBAT 


look at 
first tag 
on DLIST 


and TABLE 
not 
empty 
? 


look at 
next tag 
on DLIST 


this the 

last tag on 

the DLIST 
2 


on ELBAT and 


is take top 


TABLE off TABLE precedence number 
1 call [It ELBAT less than 
kaa 10000 
< ? 


look at 
first word 
of INPUT 


the label 

a list or list 

name 
? 


execute 
list 


put label on 
top of DAHIN 
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Function 


ABS 
ADDKEY 
ALL 
AND 
ANY 
ARCCOS 
ARCHRD 
ARCSIN 
ARCTAN 
ASSMBL 
ATOM 
BOT 
cos 
coT 
COUNT 
CUBE 
DEFINE 
DELSCR 
DSKCLS 
DSKLST 
EVAL 
EXISTS 
EXP 
FOR 
FSTATE 
GOTO 
HIRANK 
IF 
INDCTR 
INLSTL 
INLSTR 
INTGER 
INTPRT 
ITSVAL 
KEY 
LEMPTY 
LET 
LINLST 
LIST 
LISTOF 
LOAD 
LOG 
LSLCPY 
LSSCPY 
LSTDIF 
LSTMRK 
LSTNAM 
MADOBJ 
MAKEDL 


INDEX OF FUNCTIONS 
Operation 


absolute value 
add keyword 
list comparison for all words 
Boolean and 

list comparison for any words 
arccosine 

read list from archive file 
arcsine 

arctangent 

assemble 

is it a datum? 

bottom of list 

cosine 

cotangent 

count 

cube 

define function 

delete script 

close disk file 

read list from disk file 
evaluate 

does identifier exist? 
exponent 

for statement 

does disk file exist? 

go to label 

hirank of keyword 

if statement 

alpha-numeric indicator 
insert list left 

insert list right 

integer 

integer part 

the value of an attribute 
keyword search 

is list empty? 

let 

linearize list 

create list 

make a list of data 

load from disk file 

natural log 

list linear copy 

list structure copy 

are lists different? 
list-mark indicator 
description list name 
machine address of object 
make description list 
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MATCH match Al4 
MAX maximum value Al7 
MIN minimum value Al7 
MODULO modulus Al7 
MRKIND set alpha-numeric indicator Al5 
MRKLST set list-mark indicator AlG 
MRKNEG set word-length indicator negative Al16 
MRKPOS set word-length indicator positive Al5 
MTLIST empty list A3 
NEWBOT new bottom of list A3 
NEWTOP new top of list A3 
NEWVAL new value of an attribute Al0 
NOATVL remove attribute and value Alo 
NODLST remove description list AQ 
NONE list comparison for no words A8& 
NOT Soolean not Al19 
NTHBOT Nth from bottom of list AG 
NTHTOP Nth from top of list AG 
NULSTL new list left A5 
NULSTR new list right AS 
OR Boolean or A19 
POPBOT pop off bottom of list AG 
POPTOP pop off top of list A6 
PRTLC print lower case A23 
PRTUC print upper case A23 
QUIT quit A26 
RANDOM random number generator Al7 
RANSET set random number generator Al7 
RDLONL read list online A25 
READ read from console A25 
REMOVE remove fe 
REPLAC replace en 
SCRIPT read in script 
SEQLL sequence reader left All 
SEQLR sequence reader right Ate 
SEQPTR sequence pointer address i 
SEQRDR initialize sequence reader ie 
SIN sine Al7 
SQRT square root Al? 
SQUARE square i Ab 
STRLST structure list P ay 
SUBSBT substitute bottom of list AB 
SUBST substitute i AG 
SUBSTP substitute top of list Al7 
TAN tangent Al7 
TANH hyperbolic tangent A26 
TIME time A26 
TODAY date : AS 
Top top of list A23 
TXTPRT text print A22 
type : 9 
ae value of an attribute ne 
WASKEY was keyword Blesente A26 
XECOM execute CTSS conmman 
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